standart Signatur beim versenden aus Excel

Mr_Tom · 27.07.2007

Hi Leute,

ich habe eine Prozedur geschrieben, die automatisch Dateien als Email versenden soll.
Kann ich irgendwie meine Outlook standart Signatur einfügen?

Das ist der Code den ich bereits habe:

Code:

Const olByValue = 1
Const olMailItem = 0

Dim oOApp
Dim oOMail

Set oOApp = CreateObject(Outlook.Application)
Set oOMail = oOApp.CreateItem(olMailItem)

With oOMail
  .to = ****
  .Subject = 
  .Body = 
  .Attachments.Add , _
  olByValue, 1
  .Send
End With

Wie kann ich dort eintragen, dass er meine Signatur übernimmt. Habe es einfach mal mit .signature = unbenannt veruscht aber klappt leider nicht.
Ich benutze Office 2003

Vielen Dank

drulak · 27.07.2007

hiho,

also im prinzip gehts folgendermaßen:
du musst die text oder html datei aus deinem signatures-verzeichnis in ein textobjekt einlesen
dir also ne funktion schreiben, die den text aus deiner signatur zurückgibt
anschließend diesen text in deinen body einfügen

im dom gibts kein .signatures

mfg
drulak

standart Signatur beim versenden aus Excel

Mr_Tom

drulak

standart Signatur beim versenden aus Excel

ANGEBOTE & SPONSOREN

Neueste Themen

Statistik des Forums