Select first visible cell in worksheet

[KGee]

I have a multi sheet workbook with macros that are triggered by clicking on different cells. The macros perform the same function on each of the sheets but I want to place the focus on the home cell when the macro finishes running. My issue is the home cell, which I'm referring to as the first "visible cell", differs in each of the sheets. I have A3, A4, A10, B4, etc. Is there any way to accomplish this without creating a unique macro for each of the sheets?

 

[FracinDean]

What is your definition of "first", is it by row or by column? Either way, I think you will just need to start at cell a1 and loop through the cells and check the cell property .Visible and find the one that gives "TRUE" as the value of that property.

 

[mumps]

Try:

Sub FirstVisibleCell()
    Range("A2", Cells(Rows.Count, "A").End(xlUp)).SpecialCells(xlCellTypeVisible).Cells(1, 1).Select
End Sub