VBA Outlook aanroepen.

[Verwijderd]

Beste Allemaal,

Ik ben vanuit een ERP aaplicatie enkele formuliertjes aan het maken om wat gemakkelijker uit de ERP te mailen. Nu wil ik Outlook forceren de afzender mee te geven , maar ik weet niet hoe ik die moet aanpakken. Ik gebruik tot zover de volgende code :

Private Sub btn_Sendmail_Click()

Dim myOutlook As Object

Dim myMailItem As Object
Dim extratext
Set extratext = Me.txt_Opmerkingen

' Make instance
Set myOutlook = CreateObject("Outlook.Application")

' Make mail item
Set myMailItem = myOutlook.CreateItem(0)

' Set recipient
myMailItem.Recipients.Add "[e-mail]"

' Set subject with generic description and call number
myMailItem.Subject = "BLA BLA" & me.veldnamen.

' Set body
myMailItem.Body = "Geachte heer, mevrouw" _

' Send it
myMailItem.Display

' Close instance
Set myOutlook = Nothing

' Hide Call Mailscherm
frm_CallMailscherm.Hide

End Sub

[elevator]

Vragen over Outlook zijn beter op z'n plaats in Software Algemeen - ik ga ej topic eventjes verplaatsen

Windows Operating Systems >> Software Algemeen