Deine Frage-Antwort-Community
Frage stellen
    • Meinung des Tages: Medien in Deutschland genießen wieder mehr Vertrauen - was ist bei Euch der Fall?
    • Bald sollen Beamte und Selbständige in die Rentenkasse einzahlen. Wie findet ihr das?
    • Was ist die unschönste Eigenschaft die man haben kann?
    • Denkt ihr Friedrich Merz wird ein guter Kanzler?
    • Sollten die gesetzlichen Urlaubstage erhöht werden?
    • Welchen Job würdest du wollen, wenn du im Mittelalter leben würdest?
    • Alle Beiträge
    • Radiokooperation mit Absolut HOT 🔥
    • Meinung des Tages
    • Themenspecial: Wechseljahre (mit der Influencerin blondbynana)
    • Blickwechsel: Deine Fragen an einen unheilbar kranken Lungenkrebspatienten
    • Ask Me Anything:
      Alle Blickwechsel
    • Ask Me Anything:
      Alle Themenspecials
    • gutefrage Tipps
    • gutefrage Highlights
    • Computer
    • Internet & Social Media
    • Kreativität, Freizeit & Hobby
    • Lokales, Reiseziele & Urlaub
    • Medien, Unterhaltung & Musik
    • Mode & Beauty
    • Software & Apps
    • Spiele & Gaming
    • Sport & Fitness
    • Alle Themenwelten
In wenigen Minuten
Antworten auf Deine Fragen.
Frage stellen
Du hast noch kein gutefrage Profil? Jetzt kostenlos erstellen
Profil Beiträge Antworten Antworten

Frage2121676

06.05.2021
Übersicht
0
Hilf. Antw.
1
Antwort
15
Beiträge
1
Danke
0
Komplim.
0
Freunde
Erfolge

Recherchef

Zehnte Frage gestellt.

Dankwart

Erstes Danke erhalten.

Geistesblitzer

Erste Antwort gegeben.
Frage2121676
30.12.2021, 15:37
Excel Makro Mail mit versch. Konto senden?

Hallo,

ich erstelle in Excel eine PDF, die ich an eine Mail anhänge, was auch gut funktioniert. Allerdings wird dabei immer das Standardkonto "A" benützt. Ich würde gerne das Makro so anlegen, dass es immer das Konto "B" benützt.

Hier der Codeabschnitt:

' Mail senden

Dim Nachricht As Object, OutApp As Object

Dim AWS As String

Set OutApp = CreateObject("Outlook.Application")

AWS = strFileName

'InitializeOutlook = True

Set Nachricht = OutApp.CreateItem(0)

With Nachricht

.Subject = "" & Range("B2") & "_" & Range("D16") & Range("E16")

'Betreff, Name, Datum

.GetInspector.Display   ' sorgt für die Signatur

.Display

.Attachments.Add AWS

End With

Set OutApp = Nothing

Set Nachricht = Nothing

End Sub

...zum Beitrag
Antwort
von Frage2121676
30.12.2021, 15:52

Hat sich erledigt. Der Befehl .SentOnBehalfOfName = ("max@mustermann.de")

hat gefehlt.

...zur Antwort
gutefrage
  • Beitrag erstellen
  • Stöbern
  • Alle Themen
  • Hilfe / FAQ
  • Richtlinien
  • gutefrage Highlights
Partner
  • Businesspartner
  • Partner werden
Unternehmen
  • Über uns
  • Jobs
  • Kontakt
  • Presse
Rechtliches
  • Impressum
  • Datenschutz
  • AGB
  • Utiq verwalten
Weil es immer jemand weiß.
gutefrage ist so vielseitig wie keine andere Frage-Antwort-Plattform. Bei uns findest Du schnell neue Perspektiven - egal zu welchem Thema.
Gmacht in Minga. Mit
❤
Facebook Pixel