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

Forumthread: per Button email senden aus excel

per Button email senden aus excel
29.12.2015 05:48:12
Andre
Hallo liebes Forum,
ich habe eine excelmappe, da ist ein Druckbereich festgelegt. Nun möchte ich wenn der Bearbeiter das ausgefüllt hat, dass er nur die Mappe an eine festgelegte E-mail Adresse sendet. Das aber mit einem Button senden an aus Excel heraus.
Ist das möglich?
Danke für eure Hilfe
Gruß Andre

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: per Button email senden aus excel
29.12.2015 06:49:10
Andre
Hallo Forum,
mit dem versenden klappt es jetzt. Aber wie bekomme ich es hin, wenn ich in einer zelle einen Bearbeiter auswähle an den diese mail verschickt werden soll? Ich kann die Datei auch mal anhängen wenn es was nützt.
Danke für eure Hilfe und Anregungen

AW: per Button email senden aus excel
29.12.2015 07:03:20
Andre
Hallo liebes Forum,
nun habe ich doch noch eine Frage. Wie bekomme ich es hin, dass als Betreff der Inhalt aus der Zelle H4 eingegeben wird? Und als Email soll ausgewählt werden wer in Zelle N6 steht die mail adressen stehen dann in der Zelle P6. Als Anlage habe ich euch mal die Datei angehängt könnt Ihr mir Helfen?
Danke
https://www.herber.de/bbs/user/102471.xlsx

Anzeige
AW: per Button email senden aus excel
29.12.2015 08:39:13
Andre
Hallo Liebes Forum,
Danke es funktioniert wunderbar. vielen Dank
;
Anzeige
Anzeige

Infobox / Tutorial

E-Mails aus Excel per Button versenden


Schritt-für-Schritt-Anleitung

Um einen E-Mail-Button in Excel zu erstellen, der eine E-Mail an eine festgelegte Adresse sendet, befolge diese Schritte:

  1. Öffne dein Excel-Dokument und gehe in den Reiter "Entwicklertools". (Falls der Reiter nicht sichtbar ist, aktiviere ihn über die Excel-Optionen.)

  2. Füge einen Button hinzu:

    • Klicke auf "Einfügen" und wähle "Button (Formularsteuerung)" aus.
    • Zeichne den Button auf deinem Arbeitsblatt.
  3. Weise eine Makrofunktion zu:

    • Nach dem Zeichnen fragt Excel nach der Zuweisung eines Makros. Klicke auf "Neu", um ein neues Makro zu erstellen.
  4. Füge den folgenden VBA-Code ein, um die E-Mail zu versenden:

    Sub EmailButtonClick()
       Dim OutApp As Object
       Dim OutMail As Object
       Dim Empfänger As String
       Dim Betreff As String
    
       ' E-Mail-Adresse und Betreff aus Zellen auslesen
       Empfänger = Range("P6").Value
       Betreff = Range("H4").Value
    
       Set OutApp = CreateObject("Outlook.Application")
       Set OutMail = OutApp.CreateItem(0)
    
       With OutMail
           .To = Empfänger
           .Subject = Betreff
           .Body = "Hier ist der Inhalt der E-Mail." ' Optional: E-Mail-Inhalt hinzufügen
           .Display ' oder .Send, um die E-Mail direkt zu versenden
       End With
    
       Set OutMail = Nothing
       Set OutApp = Nothing
    End Sub
  5. Schließe den VBA-Editor und teste den Button.


Häufige Fehler und Lösungen

  • Fehler: E-Mail wird nicht gesendet

    • Stelle sicher, dass Outlook korrekt eingerichtet ist und als Standard-E-Mail-Programm fungiert.
  • Fehler: Button funktioniert nicht

    • Überprüfe, ob der Button mit dem richtigen Makro verknüpft ist.
  • Fehler: Falsche E-Mail-Adresse

    • Achte darauf, dass die E-Mail-Adresse in Zelle P6 korrekt eingegeben ist.

Alternative Methoden

Wenn du keinen Button verwenden möchtest, kannst du auch die folgende Methode nutzen:

  • Excel-Funktion zur E-Mail-Versendung:
    • Nutze die HYPERLINK-Funktion in einer Zelle, um einen Link zu erstellen, der beim Klicken eine E-Mail öffnet.
    • Beispiel:
      =HYPERLINK("mailto:" & P6 & "?subject=" & H4, "E-Mail senden")

Diese Methode ist einfach und benötigt kein VBA.


Praktische Beispiele

  1. E-Mail an einen ausgewählten Bearbeiter:

    • Wenn du in einer Zelle (z.B. B1) einen Bearbeiter auswählst, kannst du die E-Mail-Adresse in P6 entsprechend dynamisch ändern, um die E-Mail an den gewählten Bearbeiter zu senden.
  2. E-Mail mit Anhang:

    • Um einen Anhang hinzuzufügen, erweitere den VBA-Code um .Attachments.Add "Pfad\zur\Datei".

Tipps für Profis

  • Automatisierung: Du kannst den Button so anpassen, dass er automatisch Daten aus mehreren Zellen in die E-Mail einfügt.
  • E-Mail-Formatierung: Nutze HTML-Formatierungen im Body der E-Mail, um das Layout zu verbessern.
  • Sicherheitseinstellungen: Achte darauf, dass deine Sicherheitsrichtlinien in Outlook das Versenden von E-Mails über VBA erlauben.

FAQ: Häufige Fragen

1. Ist es notwendig, Outlook zu verwenden?
Ja, dieser Code funktioniert nur mit Outlook als E-Mail-Client.

2. Wie kann ich den Button anpassen?
Klicke mit der rechten Maustaste auf den Button und wähle "Text bearbeiten", um den Buttontext zu ändern.

3. Kann ich mehrere Empfänger hinzufügen?
Ja, trenne die E-Mail-Adressen in der Zelle P6 durch ein Semikolon, z.B. email1@example.com; email2@example.com.

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