Récupérer chemin avec valeur cellule excel vba [Résolu]

Signaler
Messages postés
3
Date d'inscription
vendredi 31 janvier 2020
Statut
Membre
Dernière intervention
1 février 2020
-
atoch
Messages postés
3
Date d'inscription
vendredi 31 janvier 2020
Statut
Membre
Dernière intervention
1 février 2020
-
Bonjour à tous,

j'ai un problème de chemin dans mon fichier excel 2013
j'ai un dossier_modèle windows avec une fichier excel dans un sous-dossier

je copie un dossier_modèle windows depuis ma feuille excel, avec des valeurs cellules.
pour rester dans ma structure d'entrepise, je dois rajouter une virgule et tiret dans le nom de dossier. ce qui donne par ex : "D:\" & Range("D3") & "," & " " & Range("P3") & " " & Range("F4") & "-" & Range("U4") . il faut savoir que la valeur des cellules sont variables par rapport à chaque dossier .
résultat ex : ville, chantier 112636-GC
jusque-là pas de problème.
Après je veux rechercher le dossier windows qui comporte presque le même nom par ex : "D:\" & Range("D3") & "," & " " & Range("P3") dans lequel se trouve des fichiers type jpg, excel, mail etc.
je veux copier ces fichiers dans mon sous-dossier "vente de mon dossier créé.
avec une msgbox pour demander : "voulez-vous copier les fichiers ? " oui ou non

merci d'avance de votre aide
cordialement atoch

3 réponses

Messages postés
6566
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
22 février 2020
454
Messages postés
3
Date d'inscription
vendredi 31 janvier 2020
Statut
Membre
Dernière intervention
1 février 2020

Bonjour,

merci pour les informations et le lien.
mon problème est le chemin du dossier :
chemin dossier source =("D:\" & Range("D3") & "," & " " & Range("P3"))
ou
chemin dossier destination :
("D:\" & Range("D3") & "," & " " & Range("P3") & " " & Range("F4") & "-" & Range("U4") & " \ Vente")

ces 2 chemins ne pointent pas vers leur dossier respectif.
il y une erreur quelque part, mais je ne sais pas où.

si vous avez une idée...

cordialement
cs_Le Pivert
Messages postés
6566
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
22 février 2020
454
En faisant cela tu verras où se situe l'erreur, tu pourras la corriger:

MsgBox "D:\" & Range("D3") & "," & " " & Range("P3")
MsgBox "D:\" & Range("D3") & "," & " " & Range("P3") & " " & Range("F4") & "-" & Range("U4") & " \ Vente"


déjà ceci:

"," & " "


s'écrit comme cela:

",  "


@+ Le Pivert
Messages postés
3
Date d'inscription
vendredi 31 janvier 2020
Statut
Membre
Dernière intervention
1 février 2020

Bonjour Le Pivert,

j'ai résolu mon problème.
en remplaçant &","& par la valeur de ma cellule &range("O3")& tout est rentré dans l'ordre et mon chemin est juste et la copie des fichiers se fait.
La range("O3") dans ma feuille de calcul est : ,

merci d'avoir pris le temps de m'aider

cordialement