Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Microsoft Exchange - abw. Absender (Gruppenpostfach) |
02.07.2023 15:01:51 |
Lukas |
|
|
|
03.07.2023 03:05:53 |
Gast28788 |
|
|
|
03.07.2023 09:54:18 |
Mase |
|
|
|
03.07.2023 15:36:50 |
Lukas |
|
|
|
04.07.2023 09:24:39 |
Mase |
|
|
Von:
Lukas |
Datum:
02.07.2023 15:01:51 |
Views:
436 |
Rating:
|
Antwort:
|
Thema:
Microsoft Exchange - abw. Absender (Gruppenpostfach) |
Hallo zusammen,
gerne würde ich via VBA in Kombination mit einem Microsoft Exchange Account eine Mail erstellen lassen, welche allerdings nicht von meinem persönlichen Mailaccount, sondern von einem Gruppenpostfach versendet werden soll. Alle Abhilfversuche und Recherchen haben mich leider nicht weitergebracht - überall heißt es, es sollte mit der Funktion .SentOnBehalfOfName funktionieren, was aber leider nicht der Fall ist. Hier deswegen der Auszug aus dem Sub:
Dim oApp As New Outlook.Application
Dim oMail As Outlook.MailItem
Dim Ins As Object
Dim wdDoc As Object
Dim wdRange As Object
Set oMail = oApp.CreateItem(olMailItem)
With oMail
.BodyFormat = olFormatHTML
.SentOnBehalfOfName = Range("F7")
.To = Range("F27")
.CC = Range("K14")
.Subject = Range("F3")
.HTMLBody = Range("K15") & Range("K16") & .HTMLBody
Set Ins = .GetInspector
Set wdDoc = Ins.WordEditor
Set wdRange = wdDoc.Range
wdRange.WholeStory
With wdRange
.Font.Size = "11"
End With
.Attachments.Add DateiName
.Display
End With
Danke im Voraus für Eure Hilfe!
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Microsoft Exchange - abw. Absender (Gruppenpostfach) |
02.07.2023 15:01:51 |
Lukas |
|
|
|
03.07.2023 03:05:53 |
Gast28788 |
|
|
|
03.07.2023 09:54:18 |
Mase |
|
|
|
03.07.2023 15:36:50 |
Lukas |
|
|
|
04.07.2023 09:24:39 |
Mase |
|
|