Sélectionner dernière cellule non vide

Bonsoir ,

Pouvez-vous me dire quel est le code pour sélectionner la dernière cellule non vide de la colonne A de la feuil1 et l'effacer .

Merci de votre expertise

Bonjour

Testes

Range("A" & Rows.Count).End(xlUp).ClearContents