Sélection d'une Plage et Suppression

Bonjour,

Depuis une ligne choisie mais toujours depuis la première colonne (A)
j'aimerais pouvoir pour commencer sélectionner cette cellule active ainsi que les 20 collones suivantes et revenir à la cellule initiale.
J'ai essayé ceci sans succès.

Dim row
ActiveCell.Name = "Posit"
nLposit = ActiveCell.row
Range(Cells(nLposit, 20), Cells(nLposit, 20)).Select
Selection.ClearContents
Application.Goto Reference:="Posit"


Merci d'avance et bonne journée

Creeks