Macro pour mettre le fichier en PJ sous outlook

[jahjah]

Bonjour,

Voici mon problème:
j'ai une macro qui enregistre ma feuille en pdf vers un dossier précis et je souhaiterai que ce pdf soit mis en pj dans un nouveau mail outlook.
J'ai essayé plusieurs choses comme une macro avec le fichier temp mais rien ne fonctionne et mes connaissances sont limitées...
voici ma macro à ce jour
Sub Enregistrer_PDF()
'
' Enregistrer_PDF Macro
'
'
Dim fichier As String
fichier = "D:\KSVA\DEVIS FOURNISSEUR\" & [I20].Value
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fichier, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
ignorePrintAreas:=False, OpenAfterPublish:=True
End Sub

en attente de votre aide précieuse

 

[jahjah]

Re : Macro pour mettre le fichier en PJ sous outlook

Merci Michel je vais essayer ce weekend!!! et merci également pour les adresses mails.....bonne journée