E-Mail versenden
04.08.2008 18:44:37
BuStü
| O | P | Q | |
| 1 | TELEFAX | TELEFON | |
| 2 | 123@567.de | ||
| 3 | willi.mustermann@nichts.de | ||
| 4 | Karl.Butz@butzhausen.de | ||
| 5 | " | ||
| 6 | " | ||
| 7 | " | ||
| 8 | " |
Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Ich möchte wenn ich auf eine E-Mail Adresse klicke, das Outlook mit der betreffenden Adresse und meiner Vorlage 123.of geöffnet wird. Ich habe bereits einen Code gefunden, weiß aber nicht wie ich diesen verbiegen kann, damit er auf die jeweilige E-Mail-Adresse reagiert.
Hier der Code:
Sub E_mail_senden() Dim objOL As New Outlook.Application Dim objMail3 As MailItem Dim Vorlage As String Vorlage = "C:\Dokumente und Einstellungen\PC\Anwendungsdaten\Microsoft\Vorlagen\123.oft" Set objMail3 = objOL.CreateItemFromTemplate(Vorlage) objMail3.To = "123@452.de" objMail3.Display End Sub
Für Eure Bemühung im voraus dankend
MfG
BuStue
Anzeige