Discussion :

[troy1985]

Bonjour,
j'utilise un code VB sur excel pour enregistrement sous format PDF
un messsage d'erreur s'affiche






Private Sub commandbutton1_click()

Dim nom, chemin As String


CommandButton1.Caption = "TEXT" & [G14] & [A9] & [U4] '

Sheets("Feuil1").Select
Sheets("Feuil1").Copy


nom = CommandButton1.Caption
chemin = "C:\Users\" & Application.UserName & "\Desktop\"

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin & nom & ".pdf"

ActiveWindow.Close
End Sub

le beug est dns se ligne de code (ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin & nom & ".pdf")
merci

[QuestVba]

Bonjour va voir ici

[troy1985]

merci pour votre aide,
ma problème est bien défini au niveau du chemin

chemin = "C:\Users\" & Application.UserName & "\Desktop\"

comment je peut mettre le chemin où je veut enregistrer mon fichier PDF est a côter du fichier source de type excel
un chemin standard pour n'importe quel machine, toujours a coter du se fichier excel
merci

[troy1985]

c résolu
il faut écrire
chemin = "..\bureau\"

dommage une autre problème , je peut pas l'envoyer par email , détection de virus et je pense que c a cause du macros???
merci de me dire comment je peut l'envoyer pas email un fichier excel avec macros?
merci.