- #1
P
POWVorti
Guest
Hi!
Ich will eine Email aus Excel senden aber der Betreff, Empfänger und Anhang dürfen nicht verändert werden. Ich habe mir hierzu drei Möglichkeiten überlegt, habe aber Probleme bei der Realisierung. Hier erstmal der Code-Auszug:
Hier meine Ideen
1. Beim .display die Eigenschaften .To, .Subject und .attachments.Add auf nicht-änderbar setzen. Allerdings weiß ich nicht, ob und wie das geht.
2. Ein benutzerdefinertes Formular aufpoppen lassen, wo man nur den BCC-Empfänger und den Nachrichtentext eingeben kann. Aber auch hier weiß ich nicht, ob und wie das geht.
3. Erst die Email ganz normal über .display aufpoppen lassen, Änderungen vom User durchführen lassen, und anschließend Betreff, Adressat und Anhang wieder überschreiben. Hierbei hab ich allerdings das Problem, daß das VBA-Makro nach dem Öffnen der Mail nicht anhält sondern durchläuft bis zum Ende. Außerdem ist meine Vermutung, daß wenn der User in der Mail auf Senden klickt, ich zwei Mails bekommen würde, einmal die vom User veränderte und einmal die durch mein Makro formatierte...
Kann mir jemand helfen?
Ich will eine Email aus Excel senden aber der Betreff, Empfänger und Anhang dürfen nicht verändert werden. Ich habe mir hierzu drei Möglichkeiten überlegt, habe aber Probleme bei der Realisierung. Hier erstmal der Code-Auszug:
Code:
Dim OutLookJob As Object, mymail As Object
Set OutLookJob = CreateObject(Outlook.Application)
Set mymail = OutLookJob.CreateItem(0)
With mymail
.To = [email protected]
.Subject = Dies ist deine Betreffzeile!
.attachments.Add C:\test.xls
.display
1. Beim .display die Eigenschaften .To, .Subject und .attachments.Add auf nicht-änderbar setzen. Allerdings weiß ich nicht, ob und wie das geht.
2. Ein benutzerdefinertes Formular aufpoppen lassen, wo man nur den BCC-Empfänger und den Nachrichtentext eingeben kann. Aber auch hier weiß ich nicht, ob und wie das geht.
3. Erst die Email ganz normal über .display aufpoppen lassen, Änderungen vom User durchführen lassen, und anschließend Betreff, Adressat und Anhang wieder überschreiben. Hierbei hab ich allerdings das Problem, daß das VBA-Makro nach dem Öffnen der Mail nicht anhält sondern durchläuft bis zum Ende. Außerdem ist meine Vermutung, daß wenn der User in der Mail auf Senden klickt, ich zwei Mails bekommen würde, einmal die vom User veränderte und einmal die durch mein Makro formatierte...
Kann mir jemand helfen?