过滤行的范围

我已经过滤了一个标准的范围。

现在我需要在Vlookup函数中使用过滤范围的地址。

我使用这个，但它返回两个范围 – 过滤的范围和标题行范围。 我怎样才能得到没有标题行过滤范围的地址？

Set filteredRng = wbCSV.Worksheets(1).Range("A2").CurrentRegion.SpecialCells(xlVisible) 

Answer 1

要获得没有标题行的过滤范围：

 With wbCSV.Worksheets(1).Range("A2").CurrentRegion Set filteredRng = .Resize(.Rows.Count - 1).Offset(1).SpecialCells(xlVisible) End With 

要得到它的地址：

 With wbCSV.Worksheets(1).Range("A2").CurrentRegion filteredRngAddress= .Resize(.Rows.Count - 1).Offset(1).SpecialCells(xlVisible).Address End With