copier des cellules

[bennisay]

bonjour le forum
je veux copier des cellules dans une autre feuille comme l exemple sur la piece joint et merci

 

[bennisay]

j ai oulblie de dire que comme affiche sur l exemple je veux avoir une liste pour tt les autres commandes et meme si j ai une autre nouvelle commande je veux qu elle soit copier directement et ainsi de suite

 

[phlaurent55]

Bonjour bennisay,

voir fichier joint

à+
Philippe

 

[bennisay]

Rebonjour
ActiveSheet.ListObjects("Tableau1").Range.AutoFilter Field:=24, Criteria1:= _
"<>"
j ai cette parie du code en jaune
dans ma feuille original j ai bcp de code
comment dois je proceder
et merci

 

[bennisay]

bonsoir phlaurent55
j ai ce message d erreur
ERREUR D EXECUTION "9"
l indice n appartient pas a la selection
vous avez une idee de quoi il sagit
merci