excel vba中如何获取筛选数据的正确行号

'获得筛选结果的行号
Sub 函数调用()
    Dim 行号 As Variant
    行号 = GetRowNum("A")
    '所得行号是一个数组，其中行号(0)未使用，如查筛选的第一行是标题的话，行号(1)是标题所在行，所以你的结果
是从行号(2)开始的。
End Sub
Function GetRowNum(Col As String) As Variant
    Dim i As Long
    Dim rng As Range
    Dim rng2 As Range
    Dim RowS()
    i = 1
    '将筛指定列的可见数据赋给rng，12是可见，2是常量，23是16+4+1+2
    Set rng = Range(Col & ":" & Col)SpecialCells(12)SpecialCells(2, 23)
    ReDim RowS(0 To rngCount)
    For Each rng2 In rng
        RowS(i) = rng2Row
        i = i + 1
    Next
    GetRowNum = RowS
End Function

以上就是关于excel vba中如何获取筛选数据的正确行号全部的内容，包括:excel vba中如何获取筛选数据的正确行号、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！