Följande kod har fungerat tidigare när jag hade Outlook2003: det är troligen så att du vid createobject kanske måste peka ut rätt version om du har 2 officeversioner installerad samtidigt. Det kanske skall vara nåt i stil med <b>"Outlook.Application.12"</b> eller nåt sånt? Tusen tack Pelle!! Ja, visst ÄR han bra, "våran" Pelle *ler* och var bara tvungen att flika in detta beröm.Skapa Outlook2007-mail från Access2003
Dim myOlApp As Outlook.Application
Set myOlApp = CreateObject("Outlook.Application")
Dim myItem As Outlook.MailItem
Set myItem = myOlApp.CreateItem(olMailItem)
Nu har jag Outlook2007 och får felmeddelandet:
"Automationfel. Det går inte att hitta den angivna modulen."
Det är på andra raden (CreateObject...) som felet uppkommer på.
Referens finns till version 12 av Msoutl.olb.
Jag hittar ingen hjälp på Microsofts sidor, någon som vet vad det beror på?
:-)
HåkanSv: Skapa Outlook2007-mail från Access2003
En annan variant är att använda early binding, dvs
http://blogs.msdn.com/nicold/archive/2006/11/26/how-to-remove-attachments-from-outlook-2007-emails-easily.aspx
På http://www.outlookcode.com/ finns massor om Outlook.Sv:Skapa Outlook2007-mail från Access2003
Jag ändrade bara raden
Set myOlApp = CreateObject("Outlook.Application")
Till
Set myOlApp = Outlook.Application
...så funkade det igen!
Må solen lysa på dig!
:-)
HåkanSv: Skapa Outlook2007-mail från Access2003