Bonjours à tous
Je voudrai copier automatiquement des cellules d'un classeur qui est en réseau vers un classeur de mon poste.
j'ai écrit le code suivant:
je me douté que mettre le chemin après Workbooks ne donnerai rien. Sauf qu'il faudra forcement que je lui indique.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Sub Macro1() Workbooks("\\Ihm-c6\DLOGGERS\Data_Ligne_21.csv").Sheets("Data_Ligne_21").Range("A2:C6").Copy Workbooks("testt.xls").Sheets("Sheet1").Range ("A2:C6") End Sub
Merci d'avance.
Partager