Sujet Précédent Sujet Suivant

Copiercoller vba excel, problème

Résolu/Fermé
2pax.cruz - 8 juil. 2010 à 09:30
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 - 8 juil. 2010 à 10:45
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

Réponse 1 / 3
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
8 juil. 2010 à 09:52
Bonjour,

Tu n'as pas nommé ton fichier arrivée...
FichierScheduleArrivee = CheminCockpit & "\" & fichier
0
Réponse 2 / 3
2pax.cruz
8 juil. 2010 à 10:18
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 jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 751
8 juil. 2010 à 10:25
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 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
8 juil. 2010 à 10:45
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
Réponse 3 / 3
2pax.cruz
8 juil. 2010 à 10:37
Merci.
0