Export Excel & PDF dans 2 dossiers différents

Bonjour à Tous,

Je souhaite faire un export au format EXCEL et PDF dans deux dossiers différents par un bouton.

Le fichier en PDF s'enregistre bien dans le bon dossier.

Le fichier EXCEL s'enregistre pas dans le bon dossier mais sous mes documents ou avec le fichier PDF.

Comme je débute je dois faire une erreur et je vous remercie de votre aide

Désolé, j'ai fait une erreur en transmettant le document.

Ci-joint le bon doc

Merci de votre aide

Bonjour,

à tester,

ThisWorkbook.Save
fichier = ThisWorkbook.FullName
Chemin1 = "C:\Users\....  'Adapter le chemin
Chemin2 = "C:\Users\....  'Adapter le chemin
Txt1 = Chemin1 & "\" & nom & ".pdf"
Txt2 = Chemin2 & "\" & nom & ".xls"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Txt1, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, OpenAfterPublish:=True
ThisWorkbook.SaveAs Txt2
Workbooks.Open fichier

Bonjour,

Désolé de ne pas avoir répondu plus tôt mais je suis sur Madagascar et parfois pas de connexion.

Ok ça fonctionne

Merci de votre aide

Bonjour VEZO,

merci pour ce retour, et bien le bonjour dans votre coin de pays,

ps/ s.v.p. marquer votre question comme étant résolu seulement par un clic sur l'icone "Résolu"

isabelle, Québec

Merci Isabelle