Récupération de fichier

Bonjour,

Je vous sollicite pour m'aider à réaliser un VBA qui vous paraîtra peut être simple mais qui me pose des soucis !

J'aimerai tout simplement une macro (activée par le bouton 1) qui aille chercher le document nommé "FICHIER1.pdf" (ou un autre nom suivant ce que j'indique dans le tableau)dans C\mes documents pour le copier/coller sur mon bureau.

Quelqu'un saurait m'aider ?

Merci d'avance !

Quelqu'un pour m'aider ?

Up

GROS UP !

Bonjour,

un exemple de caode à Modifier/Tester :

Sub Copie_Fichier()

    Dim fso As Object, Src$, Dest$, Fich$
    Set fso = CreateObject("Scripting.FileSystemObject")

    ' Chemin d'accès de la Source
    Src = "C:\Users\Desktop\"
    ' Chemin d'accès de la Destination
    Dest = "C:\Users\"

    ' Nom du fichier à copier
    Fich = ThisWorkbook.Sheets("Feuil1").Range("C6").Value

    ' Copi du Fichier
    fso.CopyFile Src & Fich, Dest & Fich

End Sub

Dis moi si tu as des question,

Pense à modifier les chemin d'accès,

Cordialement,

RemBabar

Super !

Merci Rembabar !

Reste plus qu'à l'adapter à mon sujet pour finaliser le tout !

Encore merci tu m'enlèves une épine du pied !

Rembabar,

J'ai besoin de ton aide finalement !

Si je veux que ma macro prenne en compte des noms de documents à la fois dans les cellules C6 & C7, il m'indique que le fichier n'existe pas. J'imagine qu'il n'arrive plus à faire la différence entre les différents fichiers appelés...

Aurais tu une solution ?

Bonjour,

je pense que je n'ai pas compris ta demande ...

Tu ne peux pas copier les deux fichiers en même temps, il faut que tu en copie l'un puis l'autre ..

Tu effectue le code pour le nom de document en C6 puis pour celui en C7

Essaye d'ajouter du Code ou un fichier si je n'ai pas répondu à ta question ...

RemBabar

Rechercher des sujets similaires à "recuperation fichier"