Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Mail aus Excel
 16.03.2022 11:00:55 Eugen
NotSolved
16.03.2022 12:09:10 volti
*****
NotSolved
16.03.2022 12:18:03 Gast34440
NotSolved

Ansicht des Beitrags:
Von:
Eugen		 Datum:
16.03.2022 11:00:55		 Views:
720		 Rating:
     
Antwort:
  Ja
Thema:
VBA Mail aus Excel

Hallo,

ich möchte über Excel Mails direkt via Outlook versenden. Habe mir hierzu die Spalten To und Cc angelegt und jeweils mit Adressen gefüttert. Nun möchte ich über einen Code ausgewählten Adressen eine Mail zukommen lassen. Die "To´s" sowie die "Cc´s" möchte ich gerne seperat auswählen können. Hierzu habe ich folgenden Code:

Sub sendmultiple()
    Dim xOTApp As Object
    Dim xMItem As Object
    Dim xCell As Range
    Dim xRg As Range
    Dim xEmailAddr As String
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the addresses list:", "Send To", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xOTApp = CreateObject("Outlook.Application")
    For Each xCell In xRg
        If xCell.Value Like "*@*" Then
            If xEmailAddr = "" Then
                xEmailAddr = xCell.Value
            Else
                xEmailAddr = xEmailAddr & ";" & xCell.Value
            End If
        End If
    Next
    Set xMItem = xOTApp.CreateItem(0)
    With xMItem
        .To = xEmailAddr
        .Display
    End With
End Sub

Kann mir hier jemand helfen; wie ich diesen Code ergänze um auch die Ccs auswählen zu können. In der gleichen Manier also. Danke vielmals!

Ihre Antwort
  • 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: Name: Email:



  • 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
Rot VBA Mail aus Excel
 16.03.2022 11:00:55 Eugen
NotSolved
16.03.2022 12:09:10 volti
*****
NotSolved
16.03.2022 12:18:03 Gast34440
NotSolved