email bericht verzenden vanuit access module

Status
Niet open voor verdere reacties.

ucornelius

Gebruiker
Lid geworden
13 mrt 2014
Berichten
15
Vraag van cornelius
Als ik een bericht opmaak vanuit access vba Bijvoorbeeld: DoCmd.SendObject , , , Geadresseerde, , , ONDERWERP, TEKST, -1
dan wordt outlook geopend met tekst zonder opmaak.
Graag had ik dit in Verdana 10 punten gehad.
Bestaat de mogelijkheid om tekst op te maken vanuit VBA?

Mvg
Cornelius
 
Ja, maar dan moet je niet SendObject gebruiken, maar een Outlook sessie openen. Misschien dat je ook nog iets aan je Outlook instellingen kan veranderen, dat weet ik eerlijk gezegd niet.
 
Welke verwijzingen buiten extra/verwijzingen/microsoft14.0 object library moet ik geven. Ik krijg geen automatisch genereren van de code
ps bedankt voor uw antwoord
 
ik geef bvb
1. Sub SendMail
2. Dim OutApp As Object
3. Dim OutMail As Object
4.
5. Set OutApp = CreateObject("Outlook.Application")
6. OutApp.Session.Logon
7.
8. Set OutMail = OutApp.CreateItem(0)
9. With OutMail
10. .To = "me@company.com"
11. .Subject = "Testfile"
12. .Body = "Hi! This is a test message"
13.
14. .Attachments.Add "c:\temp\database.mdb"
15.
16. .Send
17. End With
18.
19. Set OutMail = Nothing
20. Set OutApp = Nothing
21. End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan