OVH Cloud OVH Cloud

Macro pour copier un fichier

7 réponses
Avatar
arnaud
Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud

7 réponses

Avatar
Phil99999
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud





Avatar
Alain CROS
Bonjour.

Pourquoi utiliser FSO ?

FileCopy, instruction

Copie un fichier.

Syntaxe

FileCopy source, destination

La syntaxe de l'instruction FileCopy comprend les arguments nommés suivants :

Élément Description
source Expression de chaîne indiquant le nom du fichier à copier. L'argument source peut préciser le répertoire ou le dossier et le
lecteur.
destination Expression de chaîne indiquant le nom du fichier de destination. L'argument destination peut préciser le répertoire ou
le dossier et le lecteur.

Remarque

Si vous appliquez l'instruction FileCopy à un fichier ouvert, une erreur se produit.

Alain CROS

"Phil99999" (!sansspam!)> a écrit dans le message de news:

|
| Set fso = CreateObject("Scripting.FileSystemObject")
| fso.CopyFile "c:*.xls", "c:temp"
|
|
|
| > Bonjour à tous !
| > J'aimerai par VBA, copier un fichier existant et le coller à un autre
| > emplacement.
| > Quels lignes de commande taper ??
| >
| > Merci de votre aide !
| > Arnaud
| >
| >
| >
Avatar
arnaud
Merci beaucoup !!
Et si je veux modifier le nom du fichier copié ??

Merci d'avance !
Arnaud


"Phil99999" (!sansspam!)> a écrit dans le message de
news:

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud







Avatar
ClémentMarcotte
Bonjour,

name "a.xls" as "b.xls"

"arnaud" a écrit dans le message de
news:
Merci beaucoup !!
Et si je veux modifier le nom du fichier copié ??

Merci d'avance !
Arnaud


"Phil99999" (!sansspam!)> a écrit dans le message de
news:

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud











Avatar
anonymousA
bonjour,

Name renomme l'ancien fichier si dans le même répertoire ou déplace celui-ci
en renommant dans un nouveau répertoire, mais dasn tous les cas ne copie pas
ou alors je n'ai pas le même Name sur mon PC.

A+


Bonjour,

name "a.xls" as "b.xls"

"arnaud" a écrit dans le message de
news:
Merci beaucoup !!
Et si je veux modifier le nom du fichier copié ??

Merci d'avance !
Arnaud


"Phil99999" (!sansspam!)> a écrit dans le message de
news:

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud
















Avatar
ClémentMarcotte
Bonjour,

J'ai répondu à la question pour renommer le fichier une fois copié...


"anonymousA" a écrit dans le message
de news:
bonjour,

Name renomme l'ancien fichier si dans le même répertoire ou déplace
celui-ci

en renommant dans un nouveau répertoire, mais dasn tous les cas ne copie
pas

ou alors je n'ai pas le même Name sur mon PC.

A+


Bonjour,

name "a.xls" as "b.xls"

"arnaud" a écrit dans le message de
news:
Merci beaucoup !!
Et si je veux modifier le nom du fichier copié ??

Merci d'avance !
Arnaud


"Phil99999" (!sansspam!)> a écrit dans le message
de



news:

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un
autre





emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud


















Avatar
arnaud
Super !
Impec !


"Phil99999" (!sansspam!)> a écrit dans le message de
news:

Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:*.xls", "c:temp"



Bonjour à tous !
J'aimerai par VBA, copier un fichier existant et le coller à un autre
emplacement.
Quels lignes de commande taper ??

Merci de votre aide !
Arnaud