Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Email Versand aus Excel
#1
Wink 
Hallo,

ich möchte eine EMAIL an eine Person versenden die in eine Zelle per Dropdown eingetragen wird.
In der Tabelle Daten in Spalte j werden die Personen per Dropdown eingetragen, in der Tabelle Stammdaten sind diese in Spalte G aufgelistet und in Spalte H die dazugehörigen Email Adressen. Dazu soll auch noch der Text aus Tabelle Daten Spalte I in die Email als Text eingetragen werden und direkt versendet werden.

Kann mir jemand bei dieser Aufgabe helfen ?
Antworten Top
#2
Ganz ehrlich? Die Stichworte "Email Excel VBA" liefern sowohl in der Forensuche (egal welches Forum) wie auch bei Google unzählige Beiträge dazu. Das Thema ist aus meiner Sicht erschöpfend behandelt worden.
Schöne Grüße
Berni
Antworten Top
#3
Recht erschöpfend ist dies:
https://www.rondebruin.nl/win/section1.htm
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#4
Stimmt, wird immer wieder gefragt, hier das Grundgerüst
PHP-Code:
Sub SendEmail(ByVal sTo As String _
              
ByVal sSubject As String _
                
ByVal sBody As String _
                  
Optional ByRef coll As Collection)


 
   #If Early Then
 
       Dim ol As Outlook.Application
        Dim outMail 
As Outlook.MailItem
        Set ol 
= New Outlook.Application
    
#Else
 
       Dim ol As Object
        Dim outMail 
As Object
        Set ol 
CreateObject("Outlook.Application")
 
   #End If

 
   Set outMail ol.CreateItem(0)

 
   With outMail
        
.To sTo
        
.Subject sSubject
        
.Body sBody
        If Not 
(coll Is NothingThen
            Dim item 
As Variant
            For Each item In coll
                
.Attachments.Add item
            Next
        End 
If

 
       .Display
        
'.Send
    End With

    Set outMail = Nothing

End Sub 
Antworten Top
#5
Hallo,
einfach mal alles lesen !!
der reine EMAIL Versand ist mir klar, aber der Rest im Text als Vorbedingung ist unklar.
Antworten Top
#6
Tschuldigung, dass wir es gewagt haben, anzunehmen, dass Du in der Lage bist, die hervorragenden Tipps umzusetzen.
Also frei nach Deinen Worten:
Lies erst mal, bevor Du hier Helfer anmachst!
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#7
Hast Du meinen Link gelesen? Da ist exemplarisch aufgeführt, wie das geht, was Du benötigst.
Hier sogar mit einer kleinen Verfeinerung. Da der Code bzgl E-Mail Versand für Dich trivial ist,
ist die Umsetzung auf Dein Problem eine Übungsaufgabe, die wir Dir gerne überlassen.
Antworten Top
#8
Zitat:aber der Rest im Text als Vorbedingung ist unklar.

Auch der Rest ist bereits bis zum Erbrechen thematisiert und entsprechend oft gelöst worden.
Schöne Grüße
Berni
Antworten Top
#9
Liebe Helfer,

denkt bitte daran, dass der TE Hilfe sucht! Viele bereits bis "zum Erbrechen" gelöste Themen können mangels Wissen nicht umgesetzt werden. Wenn's weiterhilft, dann postet halt die 93. Lösung; Sprüche helfen nicht. :05: Angel
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
[-] Folgende(r) 1 Nutzer sagt Danke an WillWissen für diesen Beitrag:
  • Case
Antworten Top
#10
Ich habe absichtlich mal ein full quote auf die Threaderstellung gemacht:
(26.09.2018, 18:25)Arni49 schrieb: Hallo,

ich möchte eine EMAIL an eine Person versenden die in eine Zelle per Dropdown eingetragen wird.
In der Tabelle Daten in Spalte j werden die Personen per Dropdown eingetragen, in der Tabelle Stammdaten sind diese in Spalte G aufgelistet und in Spalte H die dazugehörigen Email Adressen. Dazu soll auch noch der Text aus Tabelle Daten Spalte I in die Email als Text eingetragen werden und direkt versendet werden.

Kann mir jemand bei dieser Aufgabe helfen ?

Bin ich der Einzige, der hier KEINE sachbezogene Frage erkennt?
Selbst wenn ich eine Lösung erstellen sollte:
Anhand dieser Angaben sind Folgefehler sozusagen all inclusive …
Ich sehe lediglich eine Auftragserteilung mit der Bitte, mal zu machen.
Ich gab dem TE statt dessen einen Link, der erschöpfend auf die Problematik eingeht.

Mein Verständnis vom Sinn eines Forums ist jetzt folgender Ablauf:
  • der TE liest sich ein
  • der TE probiert die Lösung anhand der Linksammlung
  • bei Problemen postet der TE seinen nicht funktionierenden Code
  • zur Verdeutlichung hängt der TE selbstverständlich seine Übungsdatei an
Dann hätte JEDER der hier von Günter kritisierten Helfer eine sachbezogene Antwort gegeben.
Und das wäre dann sogar gemeinnützig!  :21:

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste