Mail aus VBA via API verschicken |
|
Es gibt diverse Möglichkeiten, aus Word bzw. VBA heraus eine Mail zu verschicken. So sollten z.B. die MailMerge-Funktionen im Zusammenhang mit MS Outlook verwendet werden. Einschränkung: 1 Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hWnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, ByVal _ lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long 2 Private Const SW_SHOW = 5 3 Sub Mailen() 4 Dim sTo, sSubject, sBody As String 5 sTo = "xy@xyz.abc" 6 sSubject = "Betreff" 7 sBody = "Dieses steht im Mail-Text" 8 ShellExecute hWnd, "open", "mailto:" & sTo & _ " ?Subject=" & sSubject & " &Body=" & sBody, _ vbNullString, vbNullString, SW_SHOW 9 'DoEvents 10 End Sub |
Besucher: 3 online | 102 heute | 3060 diesen Monat | 2155605 insgesamt | Seitenaufrufe: 66 | Letzte Änderung: 24.06.2006 | © 2001-18 Christian Freßdorf | ||||
Tu es, oder tu es nicht. Es gibt kein Versuchen! Meister Yoda Auch ein langer Weg beginnt mit dem ersten Schritt. Laotse |
powered by phpCMS and PAX |