Effacer les données d'une colonne

Salut au forum,

je crois que je suis un peu bloqué. Dans mon projet, je souhaiterais sélectionnez un seul élément et pouvoir l'effacer avec le bouton effacer et effacer toute une colonne à partir de la deuxième ligne avec le bouton: efface tous.

Merci de m'aider.

Très respectueusement

Bonjour,

Créé un bouton et met le code suivant :

Sub Bouton1_Cliquer()
    Range(Cells(2, ActiveCell.Column), Cells(ActiveCell.End(xlDown).Rows, ActiveCell.Column)).ClearContents
End Sub

Je rencontre avec problème avec le code.

Lorsque je clique sur mon bouton où j'ai inscrire le code, il y a une erreur qui affiche et qui dit:

Erreur d’exécution '1004'

Erreur définie par l'application ou par l'objet.

Re,

Vois dans le fichier ci-retourné

Salut Raja,

je crois que c'est moi qui est mal expliqué mon problème sinon ton code fonctionne parfaitement. Seulement je souhaite que le code fonctionne dans mon Userform et avec les boutons que j'ai créé.

Merci et très respectueusement