Discussion :

[Troutchu]

Bonjour,
j'aurais besoin a partir du fichier joint de créer un bouton dans la cellule E9 (Validez votre demande) qui puisse permettre d'envoyer automatiquement le fichier en question à une adresse mail (Cellule A1) mais au format PDF....
Existe t'il une macro qui transforme un excel en PDF et envoi le mail en auto ? Que ce soit sous 2003 ou 2007
Merci

[Mr.Mof]

Bonjour,

Ca m'étonnerait qu'il existe une macro pour faire tout ça d'un coup. En revanche, il en existe pour convertir un classeur en pdf (si ce n'est pas possible directement sous 2007) et pour envoyer des fichiers par mail.
Tu peux t'en inspirer pour te créer une macro perso.

Cordialement.

[kiki29]

Salut, le format PDF est intégré en natif dans Office 2007 SP2. Faire une recherche sur CDO, et aussi Ron de Bruin.

[Fvandermeulen]

Salut,

Voici déjà un exemple pour le PDF:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub MISE_EN_PDF()
Dim NOM_PDF As String
 
NOM_PDF = "Le Nom a donner au PDF" & ".pdf"
 
    ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=ThisWorkbook.Path & "\" & NOM_PDF, _ 'Sauve dans le même répertoire que le fichier Excel
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas _
        :=False, _
        OpenAfterPublish:=False
 
End Sub

Et pour les mails, regarde ces liens:
http://www.developpez.net/forums/d95...ment-variable/

http://www.developpez.net/forums/d83...-tableau-mail/

A+

[Troutchu]

Super merci je vais essayer de tester tout cela..j'espère pouvoir m'en sortir