VBA Outlook : Création mail et insertion signature

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : VBA Outlook : Création mail et insertion signature

toph_sic

Salut,
Je suis novice dans la programmation VBA Outlook. J'ai écrit une macro pour créer un mail et insérer une signature en même temps. Voici le code :

Code :

Public Sub writeSig(strCompte As String)
Dim oMail As Outlook.MailItem
Set oMail = Outlook.Application.CreateItem(olMailItem)
With oMail
.BodyFormat = olFormatHTML
.HTMLBody = ""
.Display
End With
'MsgBox ("test" )
Dim oInsp As Outlook.Inspector
Set oInsp = oMail.GetInspector
Dim oCBP As Office.CommandBarPopup
Dim oCBB As Office.CommandBarButton
Dim cCBControls As Office.CommandBarControls
Set oCBP = oInsp.CommandBars.FindControl(, 31145)
Set cCBControls = oCBP.Controls
Dim idSig
For Each oCBB In cCBControls
If oCBB.Caption = strCompte Then
idSig = oCBB.Index
Exit For
End If
Next
cCBControls.Item(idSig).Execute
End Sub

strCompte est le nom de la signature (ce qu'on voit quand on fait insertion>signatures sous Outlook)
Sous cette forme, la macro ne fonctionne pas parfaitement. Il y a bien création d'un nouveau message mais la signature est ignorée. Par contre, si je fais apparaître une MsgBox, la signature apparaît. Est-ce clair ? En tout cas, je ne comprends pourquoi dans l'un ou l'autre cas ça fonctionne différemment.

Merci à toute l'aide qu'on pourra me donner.

---------------
toph, apprenti programmeur

Publicité

tuxbleu

renie ses origines

Ca m'intéresse ce sujet, même si il est mort depuis des siècles

otobox

Maison fondée en 2005

Je ne suis pas sur, mais si la signature apparaissait que après avoir fait apparaitre un msgbox, c'est peut être que sans ce msgbox, le message n'avait pas assez de temps pour se créer pour que l'insertion de la signature se fasse.
Peut être qu'en insérant un do event ça marcherait mieux ?

---------------
OtObOxBlOg - - - Etre seul à avoir tort c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons

tuxbleu

renie ses origines

En fait je recherche à palier le problème de l'insertion de la signature quand on fait sur un document : "clic droit, envoyer vers", ça ajoute un message, mais sans insérer la signature, c'est d'un lourd... :s

FORUM HardWare.fr

Programmation

VB/VBA/VBS

VBA Outlook : Création mail et insertion signature

Sujets relatifs
Macro excel VBA complexe sur Filtre auto + récupération des données...	Insertion d'une image postrcipt dans un doc postscript
Problème dans un mail html envoyé avec PHP	E-mail en javascript sans mailto...
[ASP] Création de fichier RTF avec ASP	Probleme creation de fichier excel a partir de php
connaitre le N° de la ligne VBA Word 2000	Tri par insertion -> Adaptation pour chaine de car
[php] [avis] interface création auto de sites pour resto	DAO et fonction VBA
Plus de sujets relatifs à : VBA Outlook : Création mail et insertion signature

Page générée en 0.025 secondes