Envoyer feuille excel en pdf par mail

Résolu/Fermé

gnioler Messages postés 88 Date d'inscription mercredi 5 octobre 2011 Statut Membre Dernière intervention 7 janvier 2015 - 8 janv. 2012 à 17:17
gnioler Messages postés 88 Date d'inscription mercredi 5 octobre 2011 Statut Membre Dernière intervention 7 janvier 2015 - 12 janv. 2012 à 13:11

Bonjour,

je voudrais savoir i quelqu'un pourais m'aider acompleter ma macro

au jourd'hui j'utilise cette macro pour enregistrer en pdf la feuille excel avec un nom automatique qui recupere des valeurs dans differentes cellule
par contre la feuille pdf reste ouverte il me manque juste la fin de la programation
qui correspond a cliquer sur le bouton
envoyer le doc par mail en piece jointe
avec remplissage automatique du destinataire
de l'objet
et de la signature

j'utilise microsoft outlook 2010

A voir également:

Envoyer une feuille excel en pdf par mail vba
Lire le coran en français pdf - Télécharger - Histoire & Religion
Liste déroulante excel - Guide
Yahoo mail - Guide
Feuille de pointage excel - Télécharger - Tableur
Convertir pdf en word excel gratuit - Guide

4 réponses

Réponse 1 / 4

Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
Modifié par Mike-31 le 8/01/2012 à 23:20

Salut,

Regarde cette Discussion récente ou je propose un code, et on en reparle

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Réponse 4 / 4

gnioler Messages postés 88 Date d'inscription mercredi 5 octobre 2011 Statut Membre Dernière intervention 7 janvier 2015 3
12 janv. 2012 à 13:11

bonjour
j'ai fait plusieurs essaie de tous ce que j'ai trouvé sur le net

celle qui me convient est lla suivantes sauf qu'il me manque juste les 3 lignes complementaire pour inserer automatiquement le sujet et le corp du message

Sub EnvoiEmail()

Dim HyperLien As String
Dim pj As Variant

Sheets("Feuil1").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ActiveWorkbook.Path & "\" & "Temporaire.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False

pj = ActiveWorkbook.Path & "\" & "Temporaire.PDF"

HyperLien = "mailto:" & Cells(1, 1).Value

ActiveWorkbook.FollowHyperlink HyperLien

Client = 6

End Sub

en fait j'exporte en pdf mon excel en fichier temporaire
je le nomme
je mets automatiquement le mail du destinataire qui est dans la cellule A1
j'ouvre le mail par outlook

et c'est moi qui clique sur le bouton envoyer car je veut controler avant que ca parte par contre

il me manque juste les 3 lignes complementaire pour inserer automatiquement le sujet du mail qui se trouve dans la cellule A2 et le corp du message qui se trouve dans la cellule A3

et inserer le pdf temporaire qui s'apelle pj

merci d'avance pour votre aide

Discussions similaires

envoyer excel en pdf via outlook vba

Macro enregistrer en PDF

Sauvegarder plusieurs onglets Excel en PDF

Impression PDF multiples depuis onglets Excel

Export feuilles excel séparées au format pdf

convertir plusieur feuilles excel en un pdf

Discussions similaires

Newsletters