Адрес строки после фильтрации

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 , чтобы получить адрес ячейки

Debug.Print FirstFilteredRow.Address