[VBA] Selezionare la prima cella vuota, anche in un foglio vuoto

[patel]

if Range("A1") <> "" then
     Range("$A$1").End(xlDown).Offset(1, 0).Select
Else
   Range("$A$1").select
End If