Access soll E-Mail erstellen MIT OUTLOOK SIGNATUR

[SaschaWittke]

hi leute,

folgende situation:

aus einem formular heraus wird durch klicken eines buttons eine email mit entsprechendem empfänger, absender, betreff, versanddatum und text erstellt.

folgenden vba-code habe ich hinter dem button hinterlegt:

Private Sub EMailButton_Click()
Dim Applikation As New Outlook.Application
Dim Mail As Outlook.MailItem
Set Mail = Applikation.CreateItem(olMailItem)
Mail.To = Me![Email]
Mail.Subject = Me![Betreff]
Mail.Attachments.Add „C:\Verwaltung\xxx.jpg“, jpg, 1, „xxxname“
Mail.HTMLBody = „“ & Me![mailtext]
Mail.DeferredDeliveryTime = Me![GebtagDJ]
Mail.SentOnBehalfOfName = „[email protected]“

Mail.Display
End Sub

nun ist es jedoch so, dass ich gerne eine in outlook programmierte signatur eingefügt haben möchte.

in outlook habe ich insgesamt 5 verschiedene signaturen hinterlegt - die die ich gerne eingefügt haben möchte heißt „Team TRC +FB“.

hat mir jemand eine codezeile die ich einbauen muss oder ggf. den korrekten code für diese problembehebung?

vielen herzlichen dank schon im voraus.

sascha

ps: ich bin kein VBA-profi (eher blutiger anfänger) und habe mir die codezeilen hier ausm internet zusammengesammelt - mehr kann ich jedoch leider nicht, daher bitte angänger-deutsch verwenden

[Netwolf]

Moin Moin,

soweit ich weiß, geht das nicht so wie du dir das denkst.
Outlook legt für jede Signatur, die du erstellst drei Signaturen in den Formaten HTML, RTF und Text an.
Du hast die Möglichkeit, abhängig vom verwendeten Emailkonto eine andere Signatur für das Antworten, das Weiterleiten und neuanlegen einer Email festzulegen.

Es gibt somit nicht einfach nur eine Signatur die man auswählen könnte.

Bei deinem Beispiel sollte die passende Signatur abhängig vom gewählten Emailkonto automatisch von Outlook hinzugefügt werden.
Falls das nicht der Fall sein sollte, prüfe deine Einstellungen von Outlook.

Private Sub EMailButton_Click()
Dim Applikation As New Outlook.Application
Dim Mail As Outlook.MailItem
Set Mail = Applikation.CreateItem(olMailItem)
Mail.To = Me![Email]
Mail.Subject = Me![Betreff]
Mail.Attachments.Add „C:\Verwaltung\xxx.jpg“, jpg, 1,
„xxxname“
Mail.HTMLBody = „“ & Me![mailtext]
Mail.DeferredDeliveryTime = Me![GebtagDJ]
Mail.SentOnBehalfOfName = „[email protected]“

Mail.Display
End Sub

Wie ich sehen kann, kennst du dich mit HTML gut aus. Dann erweitere doch einfach deine Vorgabe:

Dim MySig as String
MySig = „Meine Signatur“
…
…
Mail.HTMLBody = „“ & Me![mailtext] & MySig
…
…

D.h. wenn du nun „Meine Signatur“ entsprechend deinen Wünschen anpasst, sollte es funktionieren.

Grüße aus Rostock
Wolfgang
(Netwolf)

[SaschaWittke]

hi wolfgang,

danke für den tipp - ich habs nun wie folgt eingebaut

Private Sub EMailButton_Click()
Dim Applikation As New Outlook.Application
Dim Mail As Outlook.MailItem
Set Mail = Applikation.CreateItem(olMailItem)
Dim MySig as String
MySig = „Meine Signatur“
Mail.To = Me![Email]
Mail.Subject = Me![Betreff]
Mail.Attachments.Add „C:\Verwaltung\xxx.jpg“, jpg, 1,
„xxxname“
Mail.HTMLBody = „“ & Me![mailtext] & MySig
Mail.DeferredDeliveryTime = Me![GebtagDJ]
Mail.SentOnBehalfOfName = „[email protected]“

Mail.Display
End Sub

ist das korrekt?
ich hab natürlich den wert MEINE SIGNATUR geändert in den namen der signatur in outlook (in diesem fall: „team trc +fb“)

D.h. wenn du nun „Meine Signatur“ entsprechend deinen Wünschen
anpasst, sollte es funktionieren.

nun fügt er in die e-mail den wert MEINE SIGNATUR ein (bzw. meinen o.g. wert).

es wird aber leider nicht der html-entwurf einer bereits bestehenden outlook-signatur angezeigt

[Netwolf]

Moin Moin,

alsooooo, ICH kenne KEINE Möglichkeit per VBA auf eine Signatur in Outlook zuzugreifen!

ich hab natürlich den wert MEINE SIGNATUR geändert in den
namen der signatur in outlook (in diesem fall: „team trc +fb“)

nö, das war nicht das was ich geschrieben hatte

D.h. wenn du nun „Meine Signatur“ entsprechend deinen Wünschen
anpasst, sollte es funktionieren.

genau, erstelle in Access deiner Signatur im HTML-Code, den du als String in die Variable MySig speicherst.

Beispiel:
MySig = „“ usw. bis deine Signatur fertig ist.

Grüße aus Rostock
Wolfgang
(Netwolf)

[df6gl]

Hallo,
die Outlook-Signatures sind lediglich Textdateien in bestimmten Formaten (htm, RTF, txt) und befinden sich im Verzeichnis C:\Dokumente und Einstellungen\USERNAME\Anwendungsdaten\Microsoft\Signatures

Von dort kann die jeweils passende Datei geöffnet und in den Mail-Body eingefügt werden.

Viele Grüße vom Bodensee
Franz, DF6GL

[SaschaWittke]

hallo franz,

und wo bau ich das in meinen VBA Code ein?

danke für deine hilfe!
sascha

[Netwolf]

Moin Moin,

und wo bau ich das in meinen VBA Code ein?

ich vermute mal Franz meint, dass du es in den HTML-Code der sich in deinem VBA-Code befindet einbauen sollst.

Grüße aus Rostock
Wolfgang
(Netwolf)

[Argon_Pinkicker]

Hallo,

bin zwar auch VBA Anfänger, aber ich hatte vor etwa zwei Monaten das gleiche Problem.

Als ich dann via Access alles fertig hatte, habe ich über Google einen Beitrag gefunden, wie es dann bei mir geklappt hatte.

Leider hat es bei einem zweiten Versuch einer anderen Datenbank nicht mehr funktioniert, aber bei der ersten ist die Signatur immer mit drin.

Vielleicht klappt es ja bei dir auch:
Setze einfach hinter deinen Body-Text nochmals ein .HTMLBody.

Bei mir hat Outlook dann meine voreingestellte Signatur eingefügt.

MfG
Argon

[Reinhard_fb8cb7]

Access soll E-Mail erstellen mit Outlook Signatur
Hallo Sascha,

zunächst, ich bin sehr prädestiniert dir zu helfen denn ich bin nicht vorbelastet mit irgendwelchem störenden Wissen zu Access- und Outlook-Vba

Aber schaun wir mal ob ich dir trotzdem helfen kann.
Was ist Me und was ist Email in
Me![Email]
Oder das mal weglassend, bin nicht sehr an Access-Vba interessiert,
kannst du das auch so schreiben:
Mail.To = „[email protected]“
und die anderen derartigen Codezeilen auch umschreiben?

Mit Nichtwissen in Outlook meine ich Ernst. Bevor ich da lang rumsuchen muß beschreib mir doch bitte wie ich da 5 Signaturen anlege und sie benenne wie du es wohl getan hast.
Und was du mit „eine in outlook programmierte signatur“ genau meinst.
Das „programmiert“ irritiert mich

Dann teste ich das morgen oder so ob ich eine Vba-Lösung hinbekomme, Erfolg ungewiß.

Gruß
Reinhard

[SaschaWittke]

und wo bau ich das in meinen VBA Code ein?

ich vermute mal Franz meint, dass du es in den HTML-Code der
sich in deinem VBA-Code befindet einbauen sollst.

ja das dachte ich mir schon, hab es wohl falsch formuliert - meinte an welcher stelle des vba-codes? habs einfach mal vor die ganzen „mail.“ zeilen reinkopiert - doch es klappt nicht.

[SaschaWittke]

sorry - das bringt mich leider garnicht weiter

[Netwolf]

Moin Moin,

ok, halten wir mal fest:

1. du hast keinen blassen Schimmer von VB(A)!
2. du hast keinen blassen Schimmer von HTML!
3. du hast keinen blassen Schimmer von Outlook!
4. wie Signaturen bei Outlook funktionieren ist dir nicht bekannt!

Richtig?

Du erwartest hier fertige Lösungen, die wir dir nicht bieten können, da du das Angebotene nicht umsetzen kannst bzw. nicht verstehst was damit gemeint ist.

Da du deinen Code einfach nur kopiert hast, weißt du auch nicht, wo z.B. der HTML-Teil anfängt bzw. aufhört. Du hast den Code nicht verstanden.

Selbst wenn man dir das als Beispiel in den Code reinschreibt, kannst du es nicht umsetzen. Siehe meine vorherigen Beiträge.

Sorry, aber so funktioniert es nicht. Der beste Beweis dafür ist deine Antwort auf den Beitrag von Argon. Mensch Meier, der Hinweis ist Gold Wert!! Ich würde es auf jeden Fall mal ausprobieren.

Programmieren ist wie das Autofahren. Ich kann dir alles in der Theorie erklären und aufschreiben und aufzeichnen, fahren musst aber du selbst.

Wenn ich dann sage: tritt die Bremse und du nicht mal weißt was eine Bremse ist …sorry, so kann das nicht funktionieren.

Grüße aus Rostock
Wolfgang
(Netwolf)