Arbeitsmappe per Button versenden
Schritt-für-Schritt-Anleitung
Um eine Arbeitsmappe per E-Mail zu versenden, indem Du einen Button in Excel einfügst, folge diesen Schritten:
-
Öffne Excel und gehe zu dem Arbeitsblatt, in dem Du den Button einfügen möchtest.
-
Aktiviere die Entwicklertools: Falls der Tab „Entwicklertools“ nicht sichtbar ist, gehe zu „Datei“ > „Optionen“ > „Menüband anpassen“ und aktiviere das Kontrollkästchen für „Entwicklertools“.
-
Klicke auf den Tab „Entwicklertools“ und wähle „Einfügen“ > „Schaltfläche (Formularsteuerelement)“.
-
Ziehe mit der Maus, um die Größe des Buttons festzulegen.
-
Makro zuweisen: Wähle das Makro aus, das Du erstellen möchtest, um die E-Mail zu versenden, und klicke auf „OK“.
-
Makro erstellen: Drücke ALT + F11, um den VBA-Editor zu öffnen. Füge den folgenden Code ein:
Sub MailVersenden()
Dim olApp As Object
Dim olMail As Object
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
With olMail
.To = "deine.email@beispiel.com" ' Hier die E-Mail-Adresse eingeben
.Subject = "Hier ist das Arbeitsblatt"
.Body = "Bitte finde das angehängte Arbeitsblatt."
.Attachments.Add ActiveWorkbook.FullName
.Display ' Zum Testen; .Send zum direkten Versenden
End With
Set olMail = Nothing
Set olApp = Nothing
End Sub
-
Schließe den VBA-Editor und teste den Button.
Häufige Fehler und Lösungen
- Outlook öffnet sich nicht: Stelle sicher, dass Outlook korrekt installiert ist und als Standard-E-Mail-Client festgelegt ist.
- Makro funktioniert nicht: Prüfe, ob in Excel die Makros aktiviert sind. Gehe zu „Datei“ > „Optionen“ > „Trust Center“ > „Einstellungen für das Trust Center“ und aktiviere die Makros.
- E-Mail wird nicht gesendet: Vergewissere Dich, dass die E-Mail-Adresse im Code korrekt eingegeben ist.
Alternative Methoden
Falls Du keinen Button verwenden möchtest, kannst Du auch:
-
Ein Hyperlink einfügen, der einen E-Mail-Client öffnet. Dazu kannst Du die folgende Formel verwenden:
=HYPERLINK("mailto:deine.email@beispiel.com?subject=Hier ist das Arbeitsblatt&body=Bitte finde das angehängte Arbeitsblatt.", "E-Mail senden")
-
Ein Word-Dokument per Klick auf einen Button versenden, indem Du ähnliche VBA-Codes für Word anwendest.
Praktische Beispiele
Hier ist ein Beispiel für die Implementierung eines Excel-Buttons, der eine E-Mail mit einem Arbeitsblatt versendet:
- Erstelle eine Excel-Datei mit einem Button, der den oben genannten Code verwendet.
- Teste den Button, um sicherzustellen, dass die E-Mail korrekt generiert wird.
Du kannst auch den Beispielcode von Glen verwenden, um Deine eigene Lösung zu entwickeln.
Tipps für Profis
- Verwende den
Debug.Print-Befehl im VBA-Code, um Fehler zu identifizieren.
- Experimentiere mit verschiedenen E-Mail-Formaten und Anhangsarten, um die Benutzererfahrung zu verbessern.
- Achte darauf, den „Senden“-Button nur für vertrauenswürdige Empfänger zu verwenden, um Missbrauch zu vermeiden.
FAQ: Häufige Fragen
1. Kann ich mehrere Empfänger hinzufügen?
Ja, Du kannst mehrere E-Mail-Adressen durch ein Komma getrennt im .To-Feld einfügen.
2. Was ist der Unterschied zwischen .Display und .Send?
.Display öffnet das E-Mail-Fenster, sodass Du die E-Mail vor dem Versenden überprüfen kannst, während .Send die E-Mail direkt sendet.
3. Funktioniert dieser Code in allen Excel-Versionen?
Der Code sollte in Excel 2010 und neueren Versionen funktionieren, solange Outlook als E-Mail-Client installiert ist.