effacer ttes les données sur une colonne

[bbobb]

Bonjour à tous,
Je cherche le code VBA pour effacer ttes les données d'une colone sur un feuille.
J'ai le code suivant mais un message d'erreur sur le fonction "range" :
Feuil3.Range(Cells(3, cpt), Cells(65000, cpt)).ClearContents

Merci d'avance pour votre aide

Bbobb

 

[bbobb]

Re : effacer ttes les données sur une colonne

Bonjour Jean-Marcel,
Voici la commande complète :

' Nettoyage des anciennes données
For cpt = 2 To 182 Step 3
Feuil3.Range(Cells(3, cpt), Cells(65000, cpt)).ClearContents
Next

Si cela ne te suffit pas, j'épure le fichier pour réduire la taille et le met dans le prochain post.
Merci
Bbobb

 

[Bandoulier]

Re : effacer ttes les données sur une colonne

Pourquoi ne pas faire :
Columns("X:X").Select
Selection.ClearContents

 

[bbobb]

Re : effacer ttes les données sur une colonne

Merci à vous deux,
Jean-Marcel, j'ai trituré mon fichier dans tous les sens: impossible de le réduire à 48 ko... mais ce n'est pas grave car la solution de Bandoulier fonctionne...

Merci encore et bon week-end

Bbobb