Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1508to1512
1508to1512
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt mit Outlook versenden

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

Durchrechnung nur für ein Blatt ausschalten
KlausF

Hallo Excelperten!
In einer Datei schalte ich beim Öffnen mittels AutoOpen-Makro die automatische Durchrechnung bisher ganz aus.
Wie kann ich aber die automatische Durchrechnung nur für ein bestimmtes Blatt (z.B. Tabelle1) abschalten?
Geht das überhaupt so eingeschränkt?
Besten...
13.09.2008 15:37:53
Thread-ID: 1009517
3 Beiträge
excel-datei per email versenden
meixner

Hallo zusammen,
Habe ein Makro, dass eine Excel - Datei nach Aufmachen aktualisiert und dann per Email versendet, wenn ich dies anklicke.
Möchte, dass um eine bestimmte Uhrzeit z.B. 17.00 Uhr die Datei automatisch sich aktualisiert und versendet wird.
Habt ihr eine Idee?
wsZiel....
25.03.2009 18:13:18
Thread-ID: 1063913
2 Beiträge
Anzeige
Tabellenblatt per Mail versenden
Sandra

Hallo zusammen,
vor lauter Bäumen habe ich nix im Archiv gefunden (irgendetwas passte nie). Vielleicht hat ja jemand von Euch ein derartiges Makro schon einmal gemacht.
Ich möchte aus einer Datei ein Makro starten, was folgendes macht:
Ein Tabellenblatt dieser geöffneten Datei soll...
12.06.2009 15:45:33
Thread-ID: 1081014
4 Beiträge
Anzeige
Arbeitsmappe per Mail versenden
massimo17

Hallo,
ich möchte eine Arbeitsmappe per Mail versenden.
Folgendes Vorgehen ist geplant:
1. Der User erhält einen Fragebogen in EXCEL-Format zum ausfüllen
2. Nach erfolgreichem ausfüllen, soll er auf einen Knopf drücken der die ausgefüllte Mappe versendet
Bei mir tritt das P...
10.11.2009 16:52:09
Thread-ID: 1115943
4 Beiträge
Name nur einmal im Tabellenblatt
Heidi

Hallo zusammen,
gibt es die Möglichkeit einem Tabellenblatt zu sagen, dass z. B. der Name "Martin" nur 1 x vorkommen darf? Natürlich sind die Namen variabel.
Vielen Dank und Gruß
01.12.2009 11:37:55
Thread-ID: 1121180
5 Beiträge
Anzeige
Tabelle per Mail versenden
liese

Hallo,
habe folgendes Anliegen.
Ich möchte gerne, wenn eine Mappe geöffnet wird,
eine bestimmte Tabelle im Hintergrund mit dem
Standardmailprogramm ohne Rückfragen versenden.
Wie geht das.
Danke schon mal für Hilfe.
Viele Grüsse
Anneliese
01.01.1970 00:00:00
Thread-ID: 1139930
37 Beiträge
Anzeige
Copoe per Mail versenden
Paul

Hallo Excel-Freunde,
folgenden Code habe ich gebastelt um, gestartet über einen Button auf Sheet 1 eine Copy von Format und Werte des Sheets "Übersicht zu erstellen und diese dann frei von Macro's an die im Feld "MailAdd" stehenden Empfänfer zu senden
Das funktioniert soweit auch, nur k...
25.02.2010 10:04:02
Thread-ID: 1141285
2 Beiträge
Aufgez. Macro funktioniert nur auf einem Blatt
Mathias

Liebes Forum,
ich habe ein Macro aufgezeichnet, das nicht mit anderen Diagrammblättern in derselben Exceldatei funktioniert. Was muss ich tun, damit ich das Macro auf jedem Tabellenblatt oder sogar in anderen Exceldateien ausführen kann, ohne dass ich den Laufzeitfehler "Das Element mit dem...
03.12.2010 11:15:32
Thread-ID: 1189846
11 Beiträge
Mappe per email versenden
Stan

Hallo,
Ich will eine Arbeitsmappe mit makro als email verschicken.
Es funktioniert mit festen Empfänger. Ich will den Empfänger immer von der Zeile A15 nehmen.
Was muss ich hier ändern?
Dim Empfänger As String
Empfänger = A15
ActiveWorkbook.SendMail "Empfänger", "Thema d...
29.11.2011 12:13:57
Thread-ID: 1239871
6 Beiträge
Mappe per Mail versenden AWSCopyAs vorgeben!
Lisa

Hallo zusammen, ich benötige bitte Eure Hilfe,
Ich versende eine Excel Mappe per Mail, als Anhang aus der Anwendung heraus!
Hier möchte ich gern das der Anhang nicht Mappe1.xls heißt, sondern den Namen des Speicherstrings erhält!
Gibt es hierzu eine Möglichkeit bereits für die Zwisc...
21.01.2013 14:03:13
Thread-ID: 1295217
5 Beiträge
Datei per Mail versenden
Dani

Hallo zusammen
In meiner Datei ist ein "Senden" Button, welcher folgenden Code enthält:
Sub Send() Dim sSubject As String Dim fEmpfaenger() As Variant Dim byWert As Byte Mailadress = Cells(36, 10).Value byWert = MsgBox("Die Datei wird an folgende Mailadressen gesendet:" & vbCrLf &...
31.10.2013 19:33:16
Thread-ID: 1336741
4 Beiträge
formular per email versenden
Jürg

Hallo Forum
ich habe ein VBA gefunden das noch erweitert werden sollte ...wenn das geht.
ich möchte einen Absenzettel online erfassen , von Mitarbeiter an Chef senden als Datei.xlsm, von Chef an personal dann als pdf ankommen....
gibt es so etwas, ist das möglich?
anbei Makro un...
06.03.2014 16:53:13
Thread-ID: 1352457
3 Beiträge
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)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige