Mais uma facilidade num processo de automação.
Sub find_first_cell_after_freeze_pane()
If ActiveWindow.SplitRow = 0 And ActiveWindow.SplitColumn = 0 Then
MsgBox "No freeze Pane Found"
Exit Sub
Else
MsgBox Cells(ActiveWindow.SplitRow + 1, ActiveWindow.SplitColumn + 1).Address
End If
End Sub
Reference: Excelvbamacros.com
Tags: VBA, Excel, freeze, panel, cell, first cell