Discussion :

[fabibi001]

Bonsoir le forum,

Je me pose une question.

Au bureau, j'utilise un macro pour l'envoi d'un fichier en auto via Outlook.

Jusque là tout va bien sauf que ...

je perds mon auto-signature qui se trouve dans Outlook.

Ma question :

Est-il soit :
- possible de la conserver ?
- d'intégrer ma signature dans le body en la formatant directement dans le code (mettre en gras, en couleur, en "verdana", taille 8, etc ...)


Merci d'avance.

PS : sorry je ne dispose pas de mon code VBA à la maison

[Basicnav]

Salut,

il me semble que tu peux procéder de deux façons :

- Insérer une signature dans ton message VBA

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Sub Mail_Signature()
 
    Dim OutApp As Object
    Dim OutMail As Object
    Dim strtexte As String
    Dim SigString As String
    Dim Signature As String
 
    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)
 
    strtexte = "Bonjour," & vbNewLine & vbNewLine & _
              "je me présente" & vbNewLine & _
              "je m'appelle henri" & vbNewLine & _
              "j'voudrais bien" & vbNewLine & _
              "réussir ma vie"
 
 
 
    SigString = "C:\Documents and Settings\" & Environ("username") & _
                "\Application Data\Microsoft\Signatures\Mysig.txt"
With OutMail
        .To = "toto@laposte.net"
        .CC = ""
        .BCC = ""
        .Subject = "petit bonjour"
        .Body = strtexte & vbNewLine & vbNewLine & Signature
....
...
....

- la seconde méthode est d'utiliser une signature via fichier HTML donc qui réponds à ta demande apparemment.

où tu mets non plus mysig.txt mais mysig.html sachant que tu auras à cet emplacement un fichier html^^

J'avais déjà utilisé cette méthode il y a quelque temps et avec succés.

[fabibi001]

J'essaie dès demain.

Thx