XL 2019 Macro ne fonctionne pas

[Danyk01]

Bonjour à tous
Je viens vers vous car j'ai une macro qui ne fonctionne pas, et je ne comprends pas pourquoi !
Voir dans la pièce jointe, si je rajoute la valeur " & work & " dans la ligne, la macro ne fonctionne plus
Merci de m'aider SVP

 

[Oneida]

Bonjour,
Ne fonctionne pas: quelle erreur?
work a quelle valeur?
mettez la ligne Application.DisplayAlerts en commentaire

 

[TooFatBoy]

Bonjour,

Ca dépend de ce qu'il y a en D18... Peut-être le nom du client ? 😉


[edit]
Ah non, le nom du client a l'air d'être maintenant en S12.
Si le fichier a changé depuis le 30 octobre 2024, il faudrait l'anonymiser... et le fournir.
[/edit]

 

[Phil69970]

Bonjour @Danyk01
Edit Bonjour à tous

J'ai bien un début de réponse
Je l'ai mis ici

Bonne lecture

 

[AtTheOne]

Bonjour à toutes & à tous, bonjour @Danyk01

si je rajoute la valeur " & work & " dans la ligne, la macro ne fonctionne plus

Difficile de t'aider à partir d'une image.
Quel est le message d'erreur ou le symptôme du non fonctionnement ?
Que contient la cellule D18 d'où l'on charge la variable "work" ?
Peut-être un caractère interdit dans un nom de fichier ?
Avec les informations données dans ton post je n'arrive pas à cerner le problème...
À bientôt
EDIT : Ça rafraîchit lentement et moi je réfléchis lentement 😉

 

[Danyk01]

Bonjour à toutes & à tous, bonjour @Danyk01

Difficile de t'aider à partir d'une image.
Quel est le message d'erreur ou le symptôme du non fonctionnement ?
Que contient la cellule D18 d'où l'on charge la variable "work" ?
Peut-être un caractère interdit dans un nom de fichier ?
Avec les informations données dans ton post je n'arrive pas à cerner le problème...
À bientôt
EDIT : Ça rafraîchit lentement et moi je réfléchis lentement 😉

LOL vaut mieux lentement comme le retraité que je suis
Ci-joint le message d'erreur, également le fichier excel

 

[Danyk01]

Bonjour,
Ne fonctionne pas: quelle erreur?
work a quelle valeur?
mettez la ligne Application.DisplayAlerts en commentaire

Work fait référence à la cellule D18 (ouvrage du chantier)
Ci-joint le message d'erreur et le fichier Excel

 

[Danyk01]

Bonjour @Danyk01
Edit Bonjour à tous

J'ai bien un début de réponse
Je l'ai mis ici

Regarde la pièce jointe 1213065

Bonne lecture

Merci 👍

 

[Danyk01]

Bonjour,

Ca dépend de ce qu'il y a en D18... Peut-être le nom du client ? 😉


[edit]
Ah non, le nom du client a l'air d'être maintenant en S12.
Si le fichier a changé depuis le 30 octobre 2024, il faudrait l'anonymiser... et le fournir.
[/edit]

OK
Work fait référence à la cellule D18 (ouvrage du chantier)
Ci-joint le message d'erreur et le fichier Excel

 

[TooFatBoy]

Work fait référence à la cellule D18 (ouvrage du chantier)

Voui, c'est qu'est-ce que j'ai dit en #3. 😉

C'est sûr que si tu mets un ":" dans ton nom de fichier, ça va beaucoup moins bien marcher...

 

[Phil69970]

@Danyk01

Et est ce que ce chemin et cette arborescence existe ???

NomDossier = "F:\Documents\01.DK.BOIS_QUOTIDIEN\02.DEVIS_FACTURES\2025 FACTURES\"

Et pourquoi ces 2 lignes alors qu'une seule est suffisante

NomFichier = title & " " & " N° " & " " & numdevis & " " & nomclient & ".xlsm"
NomFichier = title & " " & "N°" & " " & numdevis & " " & nomclient & " " & work & ".xlsm"

et il y a ceci

 

[AtTheOne]

Re...
Et oui il y a quelques caractères interdits dans les noms de fichier, les : en font partie
EDIT : @TooFatBoy encore rafraîchit trop tard !
Re EDIT @Phil69970 moi je n'ai que ces caractères interdits \ / : * ? " < > | les autres y compris les caractères accentués passent (WIndows 10)
re re EDIT : un exemple pour illustrer

 

[TooFatBoy]

Et pourquoi ces 2 lignes alors qu'une seule est suffisante

Hello 😃
La première pour montrer la ligne qui fonctionne. Comme ça on sait que le chemin est bon.
La seconde pour montrer la ligne qui ne fonctionne pas à cause de l'ajout de " & work & ". Comme ça on sait que le problème se situe sur ce fameux work. 😉

 

[Danyk01]

@Danyk01

Et est ce que ce chemin et cette arborescence existe ???


Et pourquoi ces 2 lignes alors qu'une seule est suffisante


et il y a ceci
Regarde la pièce jointe 1213080

Hello Phil
Oui le chemin existe et fonctionne bien
NomFichier = title & " " & " N° " & " " & numdevis & " " & nomclient & ".xlsm" fonctionne
NomFichier = title & " " & "N°" & " " & numdevis & " " & nomclient & " " & work & ".xlsm" ne fonctionne plus
j'ai juste ajouté " & work et là ça ne fonctionne plus
je ne comprends pas où il y a l'erreur

 

[Danyk01]

Hello 😃
La première pour montrer la ligne qui fonctionne. Comme ça on sait que le chemin est bon.
La seconde pour montrer la ligne qui ne fonctionne pas à cause de l'ajout de " & work & ". Comme ça on sait que le problème se situe sur ce fameux work. 😉

Oui le chemin existe et fonctionne bien
NomFichier = title & " " & " N° " & " " & numdevis & " " & nomclient & ".xlsm" fonctionne
NomFichier = title & " " & "N°" & " " & numdevis & " " & nomclient & " " & work & ".xlsm" ne fonctionne plus
j'ai juste ajouté " & work et là ça ne fonctionne plus
je ne comprends pas où il y a l'erreur