copie fichier avec vba

copie fichier avec vba - VB/VBA/VBS - Programmation

Marsh Posté le 08-06-2006 à 07:28:19    

bonjour,
 
J'ai taper ceci comme code pour récuperer les noms de fichier de la colonneC puis copier ces fichiers vers un autre répertoire:
 
 
Sub i()
 
Dim colC As Range
Dim r As Long, c As Variant
 
 
    Set colC = Range(Cells(1, 3), Cells(Rows.Count, 3).End(xlUp))
 
             
     For Each c In colC
     FileSystemObject.CopyFile "c:\Mes Documents\lettres\c.value.doc", "c:\dossiertemp\"
     Next
 
End Sub
 
 
En ce qui concerne le c.value comme variable ceci est t'il correcte?
De plus il me dit que FileSystemObject n'est pas déclarer est ce normal?
 
Merci
 
 

Reply

Marsh Posté le 08-06-2006 à 07:28:19   

Reply

Marsh Posté le 08-06-2006 à 07:44:21    

Figure 4 : les ravages des bouts de code récupérés sur le net, sans aucune compréhension
 
1ere question : évidemment que non c'est pas correct ! il faut que tu concatènes ton chemin et la variable qui contient le nom du fichier, le VBA n'est pas du PHP, y'a un minimum de rigueur à respecter. et fais gaffe aux espaces dans tes chemins aussi
 
2eme question : FileSystemObject est une classe qu'il faut instancier avant de l'utiliser

Code :
  1. Dim fso As Scripting.FileSystemObject
  2. Set fso = new Scripting.FileSystemObject
  3. ...
  4. fso.CopyFile....


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed