J'ai une procédure qui m'active la dernière cellule de la colonne A non vide.
Je souhaiterai en fait que le curseur se place sur la cellule suivante dans la même colonne.
Sub essai()
Dim Cellule As Range
Set Cellule = Range("A65536").End(xlUp)
Cellule.Activate
End Sub