I use the following vba-code (in Microsoft Access) for sending mail in
Outlook:

Set myOlapp = CreateObject("Outlook.Application")
Set myNameSpace = myOlapp.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderDrafts)
Set myItem = myOlapp.CreateItem(olMailItem)
...

Is it possible to choose a 'briefpapier' in the vba-code? I don't know how
to translate 'briefpapier' (= dutch) in English. You can activate it in
Microsoft Outlook 2003 by choosing Tools, then Options and then the third
tab. It is beside of 'Fonts'. It is something like a template you can use
for new e-mail: you can choose font and background.

You can "click" the proper commandbar button by code. The commandbar popup
"New e-mail with" has the id=31146. The iterate through its childs and find
the letterpaper by its caption.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Am Sat, 25 Nov 2006 18:15:41 +0100 schrieb Hugo Lefebv

I use the following vba-code (in Microsoft Access) for sending mail in
Outlook:

Set myOlapp = CreateObject("Outlook.Application")
Set myNameSpace = myOlapp.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderDrafts)
Set myItem = myOlapp.CreateItem(olMailItem)
...

Is it possible to choose a 'briefpapier' in the vba-code? I don't know how
to translate 'briefpapier' (= dutch) in English. You can activate it in
Microsoft Outlook 2003 by choosing Tools, then Options and then the third
tab. It is beside of 'Fonts'. It is something like a template you can use
for new e-mail: you can choose font and background.