回复：如何获取筛选字段条件值

=OFFSET(A2,MATCH(1,SUBTOTAL(3,OFFSET(A1,ROW(2:9999),)),),)
我模拟到2000行，F公司在1500行以后才有，然后row放到了9999，没问题。

subtotal的ms帮助里的ref1没限制，ref2可选，才是限制254区域。不过一般人不用。所以对你也没影响。

自定义函数，可以获取多个筛选字段。。

Function UDF(ByRef RG As Range) As String
Dim r As Range
Dim str$, nR%, Dic As Object
nR = ActiveSheet.UsedRange.Rows.Count
Set Dic = CreateObject("scripting.dictionary")
For Each r In RG
If r.Rows.Hidden = False And Not Dic.exists(r.Value) Then Dic.Add r.Value, r.Value
Next
For nR = 0 To UBound(Dic.keys())
str = str & "," & Dic.keys()(nR)
Next
UDF = Mid(str, 2, 100)
End Function