Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

mail mit mehreren Empfängern im "CC"

Forumthread: mail mit mehreren Empfängern im "CC"

mail mit mehreren Empfängern im "CC"
15.08.2002 11:18:18
Karl
Hallo Freaks,

aus Excel heraus möchte ich makrogesteuert mails verschicken.
Mit "CC" sollen dabei Kopien an mehrere Empfänger verschickt
werden.

Folgender Code (Auszug) liefert jedoch bei der Ausführung
die Fehlermeldung "Falsche Anzahl an Argumenten oder ungültige
Eigenschaftszuweisung".


With objOutlookMsg
Set objOutlookRecip = .Recipients.Add(Mailadresse1)

'in nachfolgender Zeile tritt der Fehler auf:
.CC = .Recipients.Add(Mailadresse1, Mailadresse2, ...)
objOutlookRecip.Type = olTo
.Subject = Betrefftext
.Body = ...
...


Wie ist der Code abzuändern ?
Für Eure Hilfe vielen Dank im voraus.

Gruß Karl

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: mail mit mehreren Empfängern im "CC"
15.08.2002 11:30:31
Koenig
Hallo Karl,
bin kein Spezialist, aber ich würde .Recipients(Adresse1;Adresse2;...)
schreiben, da die verschiedenen Adressen normalerweise mit Semikolon getrennt werden.
Was ich nicht weiss, ob das Argumnet ein String sein muss! Allenfalls das Ganze halt noch in Anführungszeichen ("Adresse1;Adresse2;...")
Gruss
Anzeige
Re: mail mit mehreren Empfängern im "CC"
15.08.2002 12:15:20
Ramses
Hallo Karl,

ich bin mir nicht ganz sicher aber versuch mal folgendes:



With objOutlookMsg
Set objOutlookRecip = .Recipients.Add(Mailadresse1)
'Hier werden alle Empfänger nach CC verschoben
objOutlookRecip.Type = olCC
.Recipients = "Dein normaler Mailempfänger"
.Subject = Betrefftext
.Body =


Gruss Rainer

Anzeige
Re: mail mit mehreren Empfängern im "CC"
15.08.2002 12:49:50
Karl
Hallo Koenig,

danke für Deinen Beitrag.
Er hat mir weiter geholfen.

Syntaktisch korrekt ist:
...
.CC = "Adresse_1 [;Adresse_2] ...[;Adresse_n]"
...

Adresse_1 bis Adresse_n stehen dabei für eine Zeichenkette,
die mail-Adresse.

Re: mail mit mehreren Empfängern im "CC"
15.08.2002 15:17:37
Koenig
Betsten Dank,
Du siehst, so habe ich auch profitiert.
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Mail mit mehreren Empfängern im "CC" versenden


Schritt-für-Schritt-Anleitung

Um in Excel mit VBA eine E-Mail zu erstellen und mehrere Empfänger im "CC" zu setzen, kannst du den folgenden Code verwenden. Achte darauf, dass du Microsoft Outlook installiert hast, da dieser Code darauf basiert.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Rechtsklick auf „VBAProject (DeineDatei.xlsx)“ > „Einfügen“ > „Modul“.

  3. Kopiere den folgenden Code in das Modul:

    Sub SendEmailWithCC()
       Dim objOutlook As Object
       Dim objOutlookMsg As Object
       Dim objOutlookRecip As Object
    
       Set objOutlook = CreateObject("Outlook.Application")
       Set objOutlookMsg = objOutlook.CreateItem(0) ' 0 = olMailItem
    
       With objOutlookMsg
           ' Hier fügst du die Hauptempfängeradresse hinzu
           Set objOutlookRecip = .Recipients.Add("hauptempfaenger@example.com")
           objOutlookRecip.Type = olTo
    
           ' Hier kannst du mehrere Empfänger ins CC setzen
           .CC = "adresse1@example.com; adresse2@example.com"
           .Subject = "Betreff der E-Mail"
           .Body = "Inhalt der E-Mail"
           .Display ' Verwende .Send, um die E-Mail direkt zu senden
       End With
    End Sub
  4. Passe die E-Mail-Adressen an deine Bedürfnisse an.

  5. Führe das Makro aus, um die E-Mail zu erstellen.


Häufige Fehler und Lösungen

  • Fehlermeldung: "Falsche Anzahl an Argumenten oder ungültige Eigenschaftszuweisung"

    • Lösung: Stelle sicher, dass du die Adressen im CC-Feld korrekt mit Semikolons trennst. Beispiel: .CC = "adresse1@example.com; adresse2@example.com".
  • E-Mail wird nicht gesendet oder angezeigt

    • Lösung: Achte darauf, dass der Outlook-Client geöffnet ist und dass du die .Display- oder .Send-Methode korrekt verwendest.

Alternative Methoden

Wenn du nicht mit VBA arbeiten möchtest, kannst du auch die E-Mail direkt in Outlook erstellen und die Empfänger manuell ins CC-Feld einfügen. Eine andere Möglichkeit ist die Verwendung von Excel-Add-Ins, die die E-Mail-Funktionalität erweitern.


Praktische Beispiele

Hier ist ein praktisches Beispiel, wie du mehrere Empfänger im CC-Feld setzen kannst:

Sub BeispielEmailCC()
    Dim objOutlook As Object
    Dim objMail As Object

    Set objOutlook = CreateObject("Outlook.Application")
    Set objMail = objOutlook.CreateItem(0)

    With objMail
        .To = "hauptempfaenger@example.com"
        .CC = "kollege1@example.com; kollege2@example.com"
        .Subject = "Wichtige Informationen"
        .Body = "Hier sind die Informationen, die du angefordert hast."
        .Display
    End With
End Sub

Tipps für Profis

  • Verwende olCC für das Setzen von CC-Empfängern: Das macht den Code leserlicher.
  • Du kannst die E-Mail direkt senden, indem du .Send anstelle von .Display verwendest, wenn du sicher bist, dass alles korrekt ist.
  • Nutze Variablen für die E-Mail-Adressen, um deinen Code flexibler zu gestalten.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass die E-Mail im richtigen Format gesendet wird? Achte darauf, dass alle E-Mail-Adressen korrekt formatiert sind und mit Semikolons getrennt werden.

2. Was passiert, wenn ich mehrere Empfänger ins CC setze? Alle Empfänger im CC-Feld erhalten eine Kopie der E-Mail und können sehen, wer sonst noch die E-Mail erhalten hat.

3. Ist es möglich, BCC-Empfänger hinzuzufügen? Ja, du kannst das BCC-Feld auf ähnliche Weise wie das CC-Feld hinzufügen, indem du .BCC = "adresse@example.com" verwendest.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige