Bonjour à tous,
Je souhaite demander à l'utilisateur de sélectionner un fichier *pdf dans un commande de sélection de répertoire, puis copier/coller ce fichier dans plusieurs dossiers dont les adresses sont indiquées dans chaque cellule de la colonne F...
j'ai juste écrit ça pour l'instant...
Dim Fichier As Variant
ChDir "C:\Documents and Settings\"
Fichier = Application.GetOpenFilename("Fichiers PDF (*.pdf), *.pdf")
If Fichier = False Then Exit Sub
Une idée pour m'aider svp ?
D'avance merci le Forum !!!
Je souhaite demander à l'utilisateur de sélectionner un fichier *pdf dans un commande de sélection de répertoire, puis copier/coller ce fichier dans plusieurs dossiers dont les adresses sont indiquées dans chaque cellule de la colonne F...
j'ai juste écrit ça pour l'instant...
Dim Fichier As Variant
ChDir "C:\Documents and Settings\"
Fichier = Application.GetOpenFilename("Fichiers PDF (*.pdf), *.pdf")
If Fichier = False Then Exit Sub
Une idée pour m'aider svp ?
D'avance merci le Forum !!!