effacer ttes les données sur plusieurs colonne

[bbobb]

Bonjour a tous,
J'ai un fichier comportant 2 macros. La première fonctionne.
Mon problème est sur la seconde macro :

J'ai besoin qu"ells efface le contenu de toutes cellules de toutes les colonnes "retour" de l'onglet "détail". J'ai essayé la commande ci-dessous mais ça ne fonctionne pas.

For cpt = 2 To 182 Step 3
Feuil3.Columns("X:X").ClearContents
Next

Ci-joint un fichier...
Merci d'avance pour votre aide
Bonne journée
Bbobb

 

[Pierrot93]

Re : effacer ttes les données sur plusieurs colonne

Bonjour Bob,

pas regardé le fichier, mais modifie peut être ainsi :

For cpt = 2 To 182 Step 3
Feuil3.Columns(cpt).ClearContents
Next

bon dimanche
@+

 

[JNP]

Re : effacer ttes les données sur plusieurs colonne

Bonjour le fil 🙂,
Difficile de regarder le fichier, il renvoie un format non valide 😕...
Avec quoi l'as-tu zippé ?
Bon dimanche 😎

 

[bbobb]

Re : effacer ttes les données sur plusieurs colonne

Merci à vous deux,
Effectivement, le fichier était mal zippé...
Le problème est résolu par la commande proposé par pierrot.

Je remet toutde le fichier "bien zippé" 🙂 avec la macro corrigée.

Merci à tous bonne journée.

Bbobb