Effacé une plage de cellule

Bonsoir,

Je désirais savoir comment supprimer une plage de cellule sous mon userforme a partir de mon bouton supprimé sans effacé la ligne entière

Expl de A1 à E1

Bonjour,

Pour effacer la plage A1:E1

Private Sub CommandButton1_Click()
    Worksheets("Feuil1").Range("A1:E1").ClearContents
End Sub

Pour supprimer la plage A1:E1

Private Sub CommandButton1_Click()
    Worksheets("Feuil1").Range("A1:E1").Delete Shift:=xlShiftToLeft
End Sub

A+

Bonsoir et merci pour l'aide