Creation de bouton pdf

[mic35]

Bonjour sur le fichier joint dans le sommaire j ai plein de feuille avec un graphique par feuille .Je souhaiterais inserer sur feuille un bouton qui pourrait créer un pdf que de la feuille en question .Merci de votre retour
Cordialement base de données final (2).xlsx (133,4 Ko)

[ouisansdoute]

Bonjour,

Tu peux créer la macro suivante :
Sub Enregistrer_PDF()
Onglet = ActiveSheet().Name
Répertoire = CurDir
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Répertoire & "" & Onglet & « .pdf » _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
End Sub

Puis, sur chaque onglet positionner un bouton en lui affectant la macro.
Avant, il faudra peut-être bien dimensionner tes zones d’impression.Copie de base de données final (2).xlsm (cf. fichier joint)
|attachment (155,1 Ko)
Bonne journée