Carnage029
XLDnaute Occasionnel
Bonjour à tous,
Encore une fois je viens ici exposer mes petits problèmes en VBA, en effet j'ai rouvé sur internet plusieurs code que j'ai réussi à adapter, mais je ne trouve pas comment le faire répondre pleinement à mes besoins
Le code suivant me permet d'exporter la feuille active en tant que pdf avec le nom qui va bien, cependant je souhaiterai faire ouvrir une box à l'éxecution de la macro (par un bouton) demandant le chemin de sauvegarde (une dialogs box mais pour sauvegarder en fait)
Je vous remercie beaucoup de votre aide,
Je ne pense pas qu'il faille un fichier excel pour comprendre mais si vous en souhaitez réellement un faites moi signe
Encore une fois je viens ici exposer mes petits problèmes en VBA, en effet j'ai rouvé sur internet plusieurs code que j'ai réussi à adapter, mais je ne trouve pas comment le faire répondre pleinement à mes besoins
Code:
Sub Enreg_Pdf()
Dim theDate As String, sigleC As String, typeM As String
theDate = Format(Date, "ddmmyyyy")
sigleC = Range("A2").Value
typeM = Range("A5").Value
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sigleC & "_" & theDate & "_" & typeM & ".pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
From:=1, To:=1, OpenAfterPublish:=True
End Sub
Le code suivant me permet d'exporter la feuille active en tant que pdf avec le nom qui va bien, cependant je souhaiterai faire ouvrir une box à l'éxecution de la macro (par un bouton) demandant le chemin de sauvegarde (une dialogs box mais pour sauvegarder en fait)
Je vous remercie beaucoup de votre aide,
Je ne pense pas qu'il faille un fichier excel pour comprendre mais si vous en souhaitez réellement un faites moi signe