How to get the range of the visible rows after applying an advanced filter in Excel (VBA)

Question

Here is the code that applies an advanced filter to the column A on the Sheet1 worksheet (List range) by using the range of values on the Sheet2 (criteria range):

Answer 1

ActiveSheet.Range("A1:A100").Rows.SpecialCells(xlCellTypeVisible)

This yields a Range object.