Copiercoller vba excel, problème

Résolu
2pax.cruz -  
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,


j'ai un problème pour copier coller...


Les chemins sont corrrect mais ça ne fonctionne pas -_-"

Dim FichierScheduleDepart As String
Dim FichierScheduleArrivee As String

FichierScheduleDepart = Chemin & Fichier
FichierScheduleArrivee = CheminCockpit & "\"

FileCopy FichierScheduleDepart, FichierScheduleArrivee



Merci.
A voir également:

3 réponses

eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,

Tu n'as pas nommé ton fichier arrivée...
FichierScheduleArrivee = CheminCockpit & "\" & fichier
0
2pax.cruz
 
Parfait, ça fonctionne.

Mais lorsque le fichier est déjà dans le dossier, il ya une erreur.

Un moyen de corriger cela?
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour,
Bonjour Eriiic,
Je m'incruste une seconde par ici, si cela ne dérange pas...
Tu peux toujours tester l'existence d'un fichier avec la fonction "DIR". pour cela, un simple If suffit :
If Dir(CheminCockpit & "\" & fichier)<>"" then msgbox "Ce fichier existe déjà!"

vu dans une astuce de Laurent Longre
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Salut pijaku,

Tu as bien fait, d'autant plus que je ne connaissais pas cette astuce...
J'ai plus tendance à utiliser le traitement d'erreur dans ce cas.
A+
eric
0
2pax.cruz
 
Merci.
0