Bonjour à tous
Voici le problème que je rencontre.

Dans un premier temps je vais rechercher à l'aide de la méthode "GetOpenFileName" un document dont le chemin d'accès sera stocké dans un label.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim QuelFichier
  QuelFichier = Application.GetOpenFilename()
  If QuelFichier <> False Then
  Label_chemin_fichier_a_enregistrer.Caption = QuelFichier
Ensuite je fais apparaître un message box pour me demander si je souhaite enregistrer ce document.
Si je clique sur "oui" alors:

-La procédure va dans un premier temps créer dossier dont le nom était renseigné précédemment dans une combobox.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Select Case MsgBox("Confirmer l'enregistrement du document, vbYesNo, "Rattachement d'un document")
          Case vbYes
 
 
MkDir "F:\Base de donné REX\Base document\" & frm_fiche_creation_rex.ComboBox_choixRF.Value
C'est ensuite que les choses se compliquent

Je voudrais que le document, dont le chemin est stocké dans le label soit copier collé dans le dossier qui vient d'être crée.

J'ai essayé avec la méthode "FilCopy" mais je n'arrive pas y insérer les variables.

Pouvez-vous m'aider?
Merci