Copiercoller vba excel, problème

Résolu
2pax.cruz -  
eriiic Messages postés 24581 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.

3 réponses

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Tu n'as pas nommé ton fichier arrivée...
    FichierScheduleArrivee = CheminCockpit & "\" & fichier
    0
  2. 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
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 772
       
      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
    2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      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