Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 VBA export PDF

Soleil11

XLDnaute Occasionnel
Bonjour le Forum,

J'utilise le script ci-dessous pour exporter ma feuille sous format PDF dans mon H:drive. J'aimerais qu'il utilise le nom qui se trouve dans ma cellule "B2" qui est une liste déroulante a la place du nom ci-dessous "Export.pdf"..

--------------
Sub SavePDF()

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="H:\José DriveH\Supplier Dev\Export.pdf", _
OpenAfterPublish:=True

End Sub
------------------
Pourriez-vous m'aider à modifier ce code.

Merci d'avance pour votre aide à tout le forum.

Soleil11
 

JCGL

XLDnaute Barbatruc
Bonjour à tous,

Peux-tu essayer avec :
VB:
Sub SavePDF()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:="H:\José DriveH\Supplier Dev\" & Feuil1.Range("B2").Text & ".pdf", _
    OpenAfterPublish:=True
End Sub

A+ à tous
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…