XL 2010 Positionner un fichier pdf dans plusieurs emplacements

[jozerebel]

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 !!!

 

[Paritec]

Bonjour Jozerebel le forum
si tu pouvais passer ton fichier?
a+
Papou

 

[jozerebel]

Hello Paritec,

ci joint le fichier.

cdt

 

[jozerebel]

Je me permets de relancer le sujet svp.

merci !!!