Forums Neueste Beiträge
 

VBA: Objekt aktuell bearbeitete Mail

23/01/2008 - 02:04 von Andreas Preugschat | Report spam
Hallo NG,
ich will mir eine schnelle Lösung für folgendes Problem bauen: Um platz auf
dem Exchange-Server zu sparen, will ich künftig innerhalb der Domàne nur noch
Links zu Dateien senden. Hierzu soll eine Schaltflàche in der aktuell
bearbeiteten Mail den Link zur Datei einfügen. Das einzige, was ich bisher zu
Wege gebracht habe, ist dieses:

Public Sub LinkSetzen()
Dim myMailItem As Outlook.TaskItem
'Set myMailItem = Outlook.CreateItem(olTaskItem)
myMailItem.Body = DateiPfad
myMailItem.Display
End Sub

Das funktioniert zwar, ist aber nicht elegant, weil eine neue Mail geöffnet
wird. CreateItem ist es also nicht. Wie bekomme ich meinen Link in die
aktuelle Mail?

Herzlichen Dank für die Antworten.
Mit freundlichen Gruessen aus Berlin
Andreas Preugschat

Windows XP SP2 // Office 2003 SP2
 

Lesen sie die antworten

#1 Peter Marchert
23/01/2008 - 07:07 | Warnen spam
On 23 Jan., 02:04, Andreas Preugschat
Berlin.de> wrote:

ich will mir eine schnelle Lösung für folgendes Problem bauen: Um platz auf
dem Exchange-Server zu sparen, will ich künftig innerhalb der Domàne nur noch
Links zu Dateien senden. Hierzu soll eine Schaltflàche in der aktuell
bearbeiteten Mail den Link zur Datei einfügen. Das einzige, was ich bisher zu
Wege gebracht habe, ist dieses:

Public Sub LinkSetzen()
Dim myMailItem As Outlook.TaskItem
'Set myMailItem = Outlook.CreateItem(olTaskItem)
myMailItem.Body = DateiPfad
myMailItem.Display
End Sub

Das funktioniert zwar, ist aber nicht elegant, weil eine neue Mail geöffnet
wird. CreateItem ist es also nicht. Wie bekomme ich meinen Link in die
aktuelle Mail?



Hallo Andreas,

olTaskItem ist das Aufgabenobjekt, für E-Mails steht olMailItem.

Um die aktuell geöffnete E-Mail zu referenzieren, bitte das
ActiveInspector-Objekt verwenden:

Set objMailItem = Outlook.ActiveInspector.CurrentItem

Oder allgemein:

Set objItem = Outlook.ActiveInspector.CurrentItem

Dann kannst Du objItem einfach als Object deklarieren.

Gruß
Peter

Infos, Workshops & Software für
Outlook®: www.outlook-stuff.com

Ähnliche fragen