Bonjour à toutes et à tous,

Nous sommes trois utilisateurs (sur des postes différents) à lancer une macro qui convertit un fichier excel en pdf.
Est-il possible de faire varier le chemin d'enregistrement en fonction de l'utilisateur ou dois-je créer une macro différente pour chaque utilisateur ?
Merci d'avance pour vos réponses.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub PDF()
    Dim Nom As String
    Nom = ActiveWorkbook.Name
    Nom = Left(Nom, InStrRev(Nom, ".") - 1)
    Sheets("Bilan").ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:= ThisWorkbook.Path & "\" & Nom & ".pdf", Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub