Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Tabellenblatt mit Outlook versenden

Tabellenblatt mit Outlook versenden
10.08.2016 14:39:25
amintire
Hallo zusammen,
hat jemand einen VBA Code parat um eine Excel Tabelle mit Outlook zu senden?
Die E-Mail Adresse und Betreff sollte auch im Code hinterlegt werden.
Vielen Dank.
Grüße
Amintire
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt mit Outlook versenden
10.08.2016 14:49:54
amintire
Danke.
AW: Nachfrage
10.08.2016 15:38:00
amintire
Hi, also ich habe den Code hier genommen:
Sub Excel_Workbook_via_Outlook_Senden()
Dim Nachricht As Object, OutApp As Object
Set OutApp = CreateObject("Outlook.Application")
Dim AWS As String
'Aktive Arbeitsmappe wird als Mail gesendet
AWS = ThisWorkbook.FullName
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
.To = "irgendwer@provider"
.Subject = "Testmeldung von Excel2000 " & Date & Time
.attachments.Add AWS
.Body = "Das ist ein Test." & vbCrLf & "Bitte ignorieren."
'Hier wird die Mail nochmals angezeigt
.Display
'Hier wird die Mail gleich in den Postausgang gelegt
'Mail.Send
End With
'Outlook schliessen
OutApp.Quit
Set OutApp = Nothing
Set Nachricht = Nothing
End Sub

Der sendet mir aber die E-Mail nicht sondern legt diese bei Entwürfe ab.
Und ich möchte das nach dem Senden Outlook nicht geschlossen wird.
Er speichert auch die Mappe nicht neu ab
z.B. "Testmeldung von Excel2000 " & Date & Time auf C Laufwerk zusätzlich speichern.
Grüße
Amintire
Anzeige
AW: Nachfrage
10.08.2016 15:43:53
ChrisL
Hi
Mail.Send
statt
'Mail.Send
Das Apostroph löschen
Und...
OutApp.Quit
löschen
cu
Chris
AW: Nachfrage
10.08.2016 15:49:14
amintire
Hallo Chris,
da kommt Laufzeitfehler '424' Objekt erforderlich.
Wenn man auf Debuggen geht wird die Zeile Mail.Send gelb markiert.
Grüße
AW: Nachfrage
10.08.2016 16:01:00
ChrisL
Hi
Noch ein Versuch, nur
.Send
(ohne Mail)
cu
Chris
Anzeige
Danke funktioniert
11.08.2016 06:50:21
amintire
Grüße
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Tabellenblatt mit Outlook versenden


Schritt-für-Schritt-Anleitung

Um ein einzelnes Excel-Blatt per Mail zu versenden, kannst du VBA (Visual Basic for Applications) nutzen. Hier ist eine kurze Schritt-für-Schritt-Anleitung:

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

  2. Füge ein neues Modul hinzu:

    • Klicke auf Einfügen > Modul.
  3. Kopiere den folgenden Code in das Modul:

    Sub Excel_Workbook_via_Outlook_Senden()
       Dim Nachricht As Object, OutApp As Object
       Set OutApp = CreateObject("Outlook.Application")
       Dim AWS As String
       'Aktive Arbeitsmappe wird als Mail gesendet
       AWS = ThisWorkbook.FullName
       Set Nachricht = OutApp.CreateItem(0)
       With Nachricht
           .To = "deineemail@provider.com"  ' E-Mail-Adresse hier eingeben
           .Subject = "Testmeldung von Excel " & Date & Time
           .Attachments.Add AWS
           .Body = "Das ist ein Test." & vbCrLf & "Bitte ignorieren."
           .Display  ' Zeigt die E-Mail an
           ' .Send  ' Uncomment this line to send the email directly
       End With
       Set OutApp = Nothing
       Set Nachricht = Nothing
    End Sub
  4. Passe die E-Mail-Adresse und den Betreff an.

  5. Führe das Makro aus, um das Excel-Blatt zu versenden.


Häufige Fehler und Lösungen

  • Fehler '424: Objekt erforderlich':

    • Stelle sicher, dass du .Send ohne das Wort Mail verwendest. Ändere die Zeile zu .Send.
  • E-Mail wird nicht gesendet:

    • Überprüfe, ob du die Zeile .Display in .Send änderst, um die E-Mail direkt zu senden.
  • Outlook schließt sich nach dem Senden:

    • Entferne die Zeile OutApp.Quit, damit Outlook geöffnet bleibt.

Alternative Methoden

Wenn du kein VBA verwenden möchtest, kannst du auch Folgendes tun:

  1. Excel nur ein Blatt versenden:

    • Kopiere das gewünschte Tabellenblatt und füge es in ein neues Excel-Dokument ein.
    • Speichere das Dokument und versende es manuell über dein E-Mail-Programm.
  2. Screenshot des Blattes:

    • Mache einen Screenshot des gewünschten Tabellenblattes und füge ihn in eine E-Mail ein.

Praktische Beispiele

  • Einzelnes Tabellenblatt per Mail versenden: Angenommen, du hast eine Tabelle mit Verkaufszahlen. Du kannst das Tabellenblatt "Verkäufe" kopieren und es in eine neue Excel-Datei einfügen. Dann kannst du diese Datei per E-Mail versenden.

  • Excel Einzelnes Tabellenblatt versenden: Verwende den oben genannten VBA-Code und passe ihn an, um nur das aktive Blatt zu senden, anstatt die gesamte Arbeitsmappe.


Tipps für Profis

  • Makros automatisieren: Du kannst deine VBA-Makros so anpassen, dass sie automatisch ausgeführt werden, z.B. beim Öffnen der Datei.

  • E-Mail mit CC/BCC: Füge zusätzliche Empfänger hinzu, indem du .CC oder .BCC zur E-Mail hinzufügst:

    .CC = "ccemail@provider.com"
    .BCC = "bccemail@provider.com"
  • Export als PDF: Wenn du nur das Tabellenblatt als PDF versenden möchtest, kannst du das Dokument zuerst als PDF speichern und dann als Anhang an die E-Mail hinzufügen.


FAQ: Häufige Fragen

1. Wie sende ich nur ein bestimmtes Blatt in Excel?
Du kannst das gewünschte Blatt in ein neues Dokument kopieren und dann mit dem oben beschriebenen VBA-Code versenden.

2. Funktioniert das auch auf einem Mac?
Ja, du kannst VBA verwenden, um ein Excel-Tabellenblatt per Mail zu versenden. Achte jedoch darauf, dass die Makros in deiner Mac-Version aktiviert sind.

3. Welche Excel-Version wird benötigt?
Der VBA-Code funktioniert in den meisten modernen Excel-Versionen, einschließlich Excel 2013, 2016, 2019 und Microsoft 365.

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