XL 2016 Enregistrement .Pdf en VBA

[AdT6320]

Bonjour,

Aujourd'hui je sèche sur l'enregistrement en .PDF quand je vérifie avec la fonction F8 il me donne erreur 13, j'ai fait un copier-coller du chemin

Autre question, y a-t-il moyen d'imprimer avec la même macro 2 feuilles du même classeur dont la feuille facture sera en Portrait et recto Verso et la feuille détails en paysage uniquement en verso

merci pour votre aide
ADT

 

[sylvanu]

Bonjour Adt,
Simple question : Etes vous sûr que ce chemin est correct :

Chemin = "C:\1_DATA\Apps\ARCHIVAGE FACTURES CLIENTS & NomDossier & " \ " "

Ou plutôt celui ci :

Chemin = "C:\1_DATA\Apps\ARCHIVAGE FACTURES CLIENTS\ & NomDossier & " \ " "

J'ai supposé que vous aviez un dossier ARCHIVAGE FACTURES CLIENTS dans lequel sont rangés vos archives.
Si c'est le cas, il faut un "\" à la fin de Clients.
Sinon ma question est stupide et non avenue.

 

[AdT6320]

J'ai mis le "\" mais cela fonctionne toujours pas

 

[sylvanu]

Oups! Il y en a une autre: une chaine de caractère commence par " et finit par ".
Dans votre macro il y a la chaine :

 "C:\1_DATA\Apps\ARCHIVAGE FACTURES CLIENTS & NomDossier & "

essayez :

Chemin = "C:\1_DATA\Apps\ARCHIVAGE FACTURES CLIENTS\" & NomDossier & "\"

Pour le test après cette ligne rajoutez :

MsgBox Chemin

Vous pourrez ainsi vérifier si le chemin est bon.

 

[AdT6320]

Merci maintenant cela fonctionne on cherche beaucoup pour un \" ....