Bonjour la communauté,
J'utilise une formule pour enregistrer une feuille excel en PDF, lié sur un bouton elle fonctionne très bien. Actuellement le nom du pdf est enregistrer sous ce format Création du fichier le 19.05.2021 14305
Le code
Le nom du fichier PDF ne me convient pas vraiment. J'aimerais juste à la place le numéro d'adhérent qui est situé dans une cellule sur la même feuille. Que faut il modifié et par quoi pour que cela puisse fonctionné.
Merci pur votre retour
J'utilise une formule pour enregistrer une feuille excel en PDF, lié sur un bouton elle fonctionne très bien. Actuellement le nom du pdf est enregistrer sous ce format Création du fichier le 19.05.2021 14305
Le code
VB:
Sub PDF_SAVE()
Dim LHeure As String, LeDate As String
LHeure = Format(Time, "HMS")
LaDate = Format(Date, "dd" & "." & "mm" & "." & "yyyy")
' Création fichier PDF
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\ptb\adherent\Création du fichier le " & LaDate & " " & LHeure & ".pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
From:=1, To:=1, OpenAfterPublish:=False
' Message de confirmation
' MsgBox ("Création du fichier PDF effectué" & vbCrLf & vbCrLf & "Merci ")
End SubLe nom du fichier PDF ne me convient pas vraiment. J'aimerais juste à la place le numéro d'adhérent qui est situé dans une cellule sur la même feuille. Que faut il modifié et par quoi pour que cela puisse fonctionné.
Merci pur votre retour