excel - 过滤后的行地址

Question

我有一张大约 300k 行的工作表。我根据日期应用过滤。过滤后的工作表如下所示；

A1 - Header
A2 - Header
A243349 - First data

为了复制和粘贴，我想获得 A243349 作为地址。我尝试了下面的代码，它找到了正确的行，但是它给出了“第一个数据”而不是“A243349”

Dim DataRange As Range
Dim FirstFilteredRow As Range
With Sheets("MySheet")
    Set DataRange = Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp))
End With
Set FirstFilteredRow = DataRange.Offset(2, 0).SpecialCells(xlCellTypeVisible).Areas(1).Rows(1)

非常感谢您的帮助。

此致，

Answer 1

您需要调用Range.Address property检索单元格的地址

Debug.Print FirstFilteredRow.Address