Fonction FileCopy avec des variables


#1

Bonjour,

Je souhaite utiliser une fonction FileCopy avec des sources et destinations qui sont des variables.

Pour vous donner un exemple, voici une partie du code dont je me sers pour faire des essais. (Malheureusement tous infructueux)

Tout sélectionnerSub CopierColler()
Dim FileSource As String
Dim FileDest As String
FileSource = Sheets(“TEST”).Range(“B5”).Value
FileDest = Sheets(“TEST”).Range(“B6”).Value
FileCopy FileSource, FileDest

End Sub

Les données dans :
Sheets(“TEST”).Range(“B5”) = \C:\Users\bfdisq94\Desktop\Recherche visuel\Camion.jpg
Sheets(“TEST”).Range(“B6”) =\C:\Users\bfdisq94\Desktop\Recherche visuel\Camion2.jpg

Lorque j’exécute ce code, j’ai l’erreur suivante :
Erreur d’exécution ‘76’ :
Chemin d’accès introuvable.

Quelqu’un à une solution ?
Merci par avance.


#2

Bonjour,

Je crois que j’ai tout expliqué sur la feuille et d


#3

Bonjour
Je crois que j’ai tout expliqué sur la feuille de calcul et dans le code.
Merci de répondre pour savoir si tout fonctionne bien
Cordialement

CopyFile.xlsm (15,1 Ko)