Hello,

I use vba to send outlook mails from excel 2003 :

Sub EnvoiMailMéthodeOLE(Adresse As String, Objet As String, Corps As String,
Optional Pièce As String, Optional Cc As String, Optional Bcc As String)
Dim MonAppliOutlook As New Outlook.Application
Dim MonMail As Outlook.MailItem
Dim MaPièce As Outlook.Attachments
Set MonMail = MonAppliOutlook.CreateItem(olMailItem)

With MonMail
.Display ' retirer
le commentaire si vous voulez que le fenêtre Outlook s'affiche
.To = Adresse
If Not IsNull(Cc) Then .Cc = Cc
If Not IsNull(Bcc) Then .Bcc = Bcc
.Subject = Objet
.Body = Corps
If Not IsNull(Pièce) Then
Set MaPièce = .Attachments
MaPièce.Add Pièce, olByValue
End If
.Send
End With

End Sub

I have few problems :

1/ Is there a way to avoid the outlook 2003 confirmation box ?
2/ the confirmation box opens in the left corner of the mail windows. Is it
possible that it be centered?
3/ I would like to format some parts of the body. Is there a way to do it?
4/ Is there a property to add the default signature of outlook 2003 to the
body?

Many thanks for your help

1) See http://www.outlookcode.com/article.aspx?ID=52 for your options with
regard to the "object model guard" security prompts.

2) There is no option to control the position of the security prompt dialog.

3) Use the HTMLBody property instead of Body and provide fully tagged HTML
for the content, thus creating a message in HTML format, just like a web
page.

4) No, but if you call MonMail.GetInspector or MonMail.Display, Outlook will
load the signature into the message. Do that before you change Body or
HTMLBody. Because the body will already contain the signature, you will need
to incorporate the existing Body or HTMLBody content (i.e. the signature)
into the new value you want that property to have.

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook Programming: Jumpstart
for Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx



"thomas" wrote:

Hello,

I use vba to send outlook mails from excel 2003 :

Sub EnvoiMailMéthodeOLE(Adresse As String, Objet As String, Corps As String,
Optional Pièce As String, Optional Cc As String, Optional Bcc As String)
Dim MonAppliOutlook As New Outlook.Application
Dim MonMail As Outlook.MailItem
Dim MaPièce As Outlook.Attachments
Set MonMail = MonAppliOutlook.CreateItem(olMailItem)

With MonMail
.Display ' retirer
le commentaire si vous voulez que le fenêtre Outlook s'affiche
.To = Adresse
If Not IsNull(Cc) Then .Cc = Cc
If Not IsNull(Bcc) Then .Bcc = Bcc
.Subject = Objet
.Body = Corps
If Not IsNull(Pièce) Then
Set MaPièce = .Attachments
MaPièce.Add Pièce, olByValue
End If
.Send
End With

End Sub

I have few problems :

1/ Is there a way to avoid the outlook 2003 confirmation box ?
2/ the confirmation box opens in the left corner of the mail windows. Is it
possible that it be centered?
3/ I would like to format some parts of the body. Is there a way to do it?
4/ Is there a property to add the default signature of outlook 2003 to the
body?

Many thanks for your help

Thanks

I'll try it tuesday when back to office. Monday is our national holiday


"Sue Mosher [MVP-Outlook]" a écrit dans le message
de groupe de discussion :
...
1) See http://www.outlookcode.com/article.aspx?ID=52 for your options with
regard to the "object model guard" security prompts.

2) There is no option to control the position of the security prompt dialog.

3) Use the HTMLBody property instead of Body and provide fully tagged HTML
for the content, thus creating a message in HTML format, just like a web
page.

4) No, but if you call MonMail.GetInspector or MonMail.Display, Outlook will
load the signature into the message. Do that before you change Body or
HTMLBody. Because the body will already contain the signature, you will need
to incorporate the existing Body or HTMLBody content (i.e. the signature)
into the new value you want that property to have.

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook Programming: Jumpstart
for Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx



"thomas" wrote:

Hello,

I use vba to send outlook mails from excel 2003 :

Sub EnvoiMailMéthodeOLE(Adresse As String, Objet As String, Corps As
String,
Optional Pièce As String, Optional Cc As String, Optional Bcc As String)
Dim MonAppliOutlook As New Outlook.Application
Dim MonMail As Outlook.MailItem
Dim MaPièce As Outlook.Attachments
Set MonMail = MonAppliOutlook.CreateItem(olMailItem)

With MonMail
.Display ' retirer
le commentaire si vous voulez que le fenêtre Outlook s'affiche
.To = Adresse
If Not IsNull(Cc) Then .Cc = Cc
If Not IsNull(Bcc) Then .Bcc = Bcc
.Subject = Objet
.Body = Corps
If Not IsNull(Pièce) Then
Set MaPièce = .Attachments
MaPièce.Add Pièce, olByValue
End If
.Send
End With

End Sub

I have few problems :

1/ Is there a way to avoid the outlook 2003 confirmation box ?
2/ the confirmation box opens in the left corner of the mail windows. Is
it
possible that it be centered?
3/ I would like to format some parts of the body. Is there a way to do it?
4/ Is there a property to add the default signature of outlook 2003 to the
body?

Many thanks for your help