Live-Forum - Die aktuellen Beiträge
Datum
Titel
03.11.2025 15:51:02
Zelle E1,Uhrzeit ,gleiche Datum in sichtbare Zellen N suchen
03.11.2025 14:48:20
Links funktionieren nur bei ganzer Tabelle, nicht bei Auszug
03.11.2025 12:49:44
Zählenwenn verwenden über VBA mit einem ExcelNamen
03.11.2025 09:55:38
VBA: Notiz zu einer Zelle hinzufügen funktioniert nicht
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1480to1484
1480to1484
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

outlook öffnen und neue mail erstellen

Forumthread: outlook öffnen und neue mail erstellen

outlook öffnen und neue mail erstellen
12.03.2016 11:44:38
Matthias
hi,
ich wollte fragen, warum mein makro nicht funktioniert..
könnt ihr mir dabei helfen? danke!
Public Sub Outlook_öffnen()
Set MyOutApp = CreateObject("Outlook.Application")
Set MyMessage = MyOutApp.CreateItem(0)
With MyMessage
.To = Range("B1")
.Subject = Range("B4")
.cc = Range("B2")
.bcc = Range("B3")
.Body = Range("B5") & vbCrLf & vbCrLf & Range("B6") & vbCrLf & vbCrLf & Range("B7") & vbCrLf &   _
_
Range("B8") & vbCrLf & Range("B9") & vbCrLf & vbCrLf & Range("B10") & vbCrLf & vbCrLf & Range(" _
B11")
.Display
'.attach = "C:\Users\" 'Hier wird ein Attachment eingefügt
'.Send 'Hier wird die Mail gesendet
End With
Set MyOutApp = Nothing
Set MyMessage = Nothing
End Sub

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: outlook öffnen und neue mail erstellen
12.03.2016 17:43:36
Herbert
Hi Matthias,
probiers mal damit:
Sub Outlook_öffnen()
Dim MyOutApp As Object
Dim MyMessage As Object
Set MyOutApp = CreateObject("Outlook.Application")
Set MyMessage = MyOutApp.CreateItem(0)
With MyMessage
.To = Range("B1")
.Subject = Range("B4")
.cc = Range("B2")
.bcc = Range("B3")
.Body = Range("B5") & vbCrLf & vbCrLf & Range("B6") & vbCrLf & vbCrLf & Range("B7") &  _
vbCrLf & Range("B8") & vbCrLf & Range("B9") & vbCrLf & vbCrLf & Range("B10") & vbCrLf & vbCrLf & Range(" B11 ")
.Display
'.attach = "C:\Users\" 'Hier wird ein Attachment eingefügt
'.Send 'Hier wird die Mail gesendet
End With
Set MyOutApp = Nothing
Set MyMessage = Nothing
End Sub
Servus

Anzeige
AW: outlook öffnen und neue mail erstellen
14.03.2016 21:09:15
Matthias
danke,
leider erscheint folgender fehler:
Die Methode "To" für das Objekt '_MailItem' ist fehlgeschlagen..
lg

AW: outlook öffnen und neue mail erstellen
15.03.2016 09:57:11
Herbert
Hallo Matthias,
probiers mal so:
      .To = Range("B1").Value
.Subject = Range("B4").Value
.cc = Range("B2").Value
.bcc = Range("B3").Value
Wenn es nicht funzt, dann kann ich dir leider nicht mehr weiter helfen, da ich Outlook nicht installiert habe.
Servus

Anzeige
AW: outlook öffnen und neue mail erstellen
15.03.2016 19:55:33
Matthias
perfekt, jetzt funktioniert es.
vielen dank!
lg

AW: outlook öffnen und neue mail erstellen
15.03.2016 20:01:48
Herbert
Prima! Gerne geschehen!
Servus
;

Forumthreads zu verwandten Themen

Excel als *neues* Fenster öffnen
Susanne

Hallo,
Excel Dateien werden normalerweise in ein und dasselbe Fenster geladen, obwohl sie als einzelne Tasks in der Taskleiste aufscheinen. Um die Fenster auf unterschiedliche Monitore zu verschieben, sollen das öffnen einer Datei auch ein neues Programm-Fenster erzwingen. Geht das irgendwi...
25.09.2009 04:00:53
Thread-ID: 1105409
6 Beiträge
Anzeige
Datei öffnen (neueste Version öffnen)
Falk

Hallo zusammen,
Workbooks.Open Filename:="\\server\Unterordner1\Unterornder2\ ... \Dateiname.xls"
kann ich prima eine mir namentlich bekannte Datei öffnen.
Mein Problem ist jetzt, daß der Dateiname variiert aber immer mit z.B."Tagesumsatz" anfängt.
Der Pfad ist immer der gleiche...
19.01.2010 15:57:09
Thread-ID: 1131098
7 Beiträge
Anzeige
Neue Tabelle öffnen
Gerog

Hallo liebe Excelgemeinde,
Ich habe in meiner Tabelle 2, Daten, die ich mal einfüge . Und möchte in der tabelle 3 diese Daten anrufen aber mit ein paar Formels
ich habe nur gerade mit VBA angefangen und wollte gern wissen, wie ich diese neue Tabelle generieren kann
17.03.2011 13:20:53
Thread-ID: 1206100
4 Beiträge
Neue Datei öffnen und alte beenden
Peter

Liebes Forum,
habe eine einfache Frage die bestimmt schon zig mal diskutiert wurde. Leider finde ich nicht die Antwort.
Also, ich habe eine Datei A. Aus dieser Datei öffne ich per Makro eine zweite Datei B. Nun soll Datei B offen bleiben und Datei A gespeichert und geschlossen werden. <...
27.05.2011 14:34:19
Thread-ID: 1216351
5 Beiträge
Anzeige
von userform neue Tabelle öffnen
userform

Hallo alle zusammen,
ich habe folgenden Code, möchte aber die Datei als neues Excel Blatt öffnen, da die UserForm geöffnet bleiben muss.
Nur der untere beschriebene Code öffnet mir die Datei in der geöffneten Excel Tabelle und dann kann man nicht an der Datei arbeiten solange die UserF...
08.11.2011 12:52:33
Thread-ID: 1237032
4 Beiträge
mit VBA (aus Excel) eine Outlook-2010-Mail erstell
Mischa

Hallo,
wie ist der VB6- Code, um aus einer Anwendung wie zB Excel heraus eine Outlook 2010 - Email zu erstellen?
Will nach KLick auf Button bestimmte Zellinhalte per Mail versenden,
mit bisherigen Outlook-Versionen wars kein Problem - bin aber jetzt umgestiegen ...
Danke für je...
22.02.2012 22:51:53
Thread-ID: 1252010
2 Beiträge
Anzeige
Excel-Ausgabe in Googlemail zur Bearbeitung öffnen
Ratfish

Moin zusammen,
ich habe vor einiger Zeit mit Hilfe dieses Forums (danke dafür) ein kleines Script geschrieben in dem aus Excel 2007 eine E-Mail generiert und in Outlook zur weiteren Bearbeitung geöffent wird. [...] Set objOL = CreateObject("Outlook.Application") Set objMail = objOL.CreateIt...
26.06.2012 12:21:07
Thread-ID: 1268857
3 Beiträge
Neueste PDF finden und mailen
Patrick

Hallo Zusammen,
ich habe ein für mich zu umfangreiches VBA-Problem und hoffe von euch eine Lösung zu erhalten.
Ich möchte per VBA aus drei verschiedenen Verzeichnisses mir jeweils die neueste PDF-Datei als Anhang in eine Outlook-Mail einfügen lassen. Dort dann automatisiert Empfänger, B...
08.11.2012 11:03:51
Thread-ID: 1285801
9 Beiträge
Neue ExcelDatei öffnen
uphi

Hallo @ all!
Erster Schritt:
Ich möchte per Makto eine neue, zweite, Datei öffnen. Dann aus der ersten Datei eine Seite mit Daten kopieren und in die neue Datei einfügen. Es sollen nur Werte übertragen werden, keine Formeln oder Berechnungen. Dann soll die zweite Datei unter einem neue...
02.02.2013 12:42:20
Thread-ID: 1297222
2 Beiträge
range in neuem Fenster öffnen?
Chris

Hallo VBAler
ich habe ein Sheet, dass bei Aktivierung automatisch bestimmte Zellen aktualisiert. Prima! Soll so bleiben.
Nun will ich mir manchmal nur einen Teil des Sheets ansehen, ohne dass es zu einer Aktualisierung kommt.
Kann man per VBA einen Range aus einem bestimmten Sheet i...
25.04.2013 17:03:27
Thread-ID: 1310488
10 Beiträge
Exel unsichtbar - und doch neue Excel öffnen
Pascal

Guten Tag
In einer Excel-Arbeitsmappe hab ich in der Workbook-Open-Sub drin u.a. folgenden Code:
Excel.Application.Visible = False
Ziel: Es soll dem User nur eine Userform angezeigt werden. – Excel soll also nicht sichtbar sein.
Das funktioniert soweit perfekt.
Nun aber mein...
03.02.2014 15:57:02
Thread-ID: 1347834
6 Beiträge
Neues Dokument öffnen und altes speichern & schlie
ANNAnas

Hallo Elite :)
Ich habe folgendes Problem mit meinem geschriebenen Code:
Wenn ich eine Datei aus der Listbox 2 wähle und öffne, soll die letzte aktuelle Datei geschlossen werden. Das funktioniert nur leider nicht so, wie ich es mir vorstelle... :C
Die Ursprungsdatei bleibt leider ge...
27.02.2014 11:59:06
Thread-ID: 1351445
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Outlook öffnen und neue Mail erstellen

Schritt-für-Schritt-Anleitung

Um Outlook über ein Makro in Excel zu öffnen und eine neue E-Mail zu erstellen, folge diesen Schritten:

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

  2. Füge ein neues Modul hinzu:

    • Rechtsklick auf „VBAProject (DeineDatei.xlsx)“.
    • Wähle „Einfügen“ > „Modul“.

  3. Kopiere den folgenden Code in das Modul:

    Sub Outlook_öffnen()
   Dim MyOutApp As Object
   Dim MyMessage As Object
   Set MyOutApp = CreateObject("Outlook.Application")
   Set MyMessage = MyOutApp.CreateItem(0)
   With MyMessage
       .To = Range("B1").Value
       .Subject = Range("B4").Value
       .CC = Range("B2").Value
       .BCC = Range("B3").Value
       .Body = Range("B5").Value & vbCrLf & vbCrLf & Range("B6").Value & vbCrLf & vbCrLf & Range("B7").Value & vbCrLf & _
                Range("B8").Value & vbCrLf & Range("B9").Value & vbCrLf & vbCrLf & Range("B10").Value & vbCrLf & vbCrLf & Range("B11").Value
       .Display
       '.Attach = "C:\Users\" 'Hier wird ein Attachment eingefügt
       '.Send 'Hier wird die Mail gesendet
   End With
   Set MyOutApp = Nothing
   Set MyMessage = Nothing
End Sub

  4. Fülle die Zellen B1 bis B11 in deinem Excel-Sheet mit den entsprechenden Werten (E-Mail-Adressen, Betreff, etc.).

  5. Führe das Makro aus: Drücke F5, um das Makro auszuführen und eine neue E-Mail in Outlook zu öffnen.

Häufige Fehler und Lösungen

  • Fehler: "Die Methode 'To' für das Objekt '_MailItem' ist fehlgeschlagen."

    • Lösung: Stelle sicher, dass die Zelle B1 tatsächlich eine gültige E-Mail-Adresse enthält. Verwende .Value, um sicherzustellen, dass der Wert der Zelle abgerufen wird:
    .To = Range("B1").Value

  • Fehler: Outlook öffnet sich nicht oder das Makro wird nicht ausgeführt.

    • Lösung: Überprüfe, ob Outlook korrekt installiert und konfiguriert ist. Stelle sicher, dass Makros in Excel aktiviert sind.

Alternative Methoden

Wenn du keine VBA-Kenntnisse hast, kannst du auch die integrierte Funktion „E-Mail“ in Excel verwenden:

  1. Wähle die Zelle mit der E-Mail-Adresse aus.
  2. Klicke auf „Einfügen“ > „Link“ > „E-Mail-Adresse“.
  3. Gib Betreff und Nachricht ein, um eine neue E-Mail zu erstellen.

Diese Methode ist weniger flexibel, aber einfach zu bedienen.

Praktische Beispiele

Hier sind einige Anwendungsbeispiele für das Makro:

  1. E-Mail an mehrere Empfänger:

    • Füge mehrere E-Mail-Adressen in die Zellen B1, B2 und B3 ein.

  2. Attachments hinzufügen:

    • Um einen Anhang hinzuzufügen, nutze die Zeile .Attachments.Add "C:\Pfad\zu\deiner\Datei.txt" innerhalb des With MyMessage Blocks.

  3. E-Mail im Entwurf speichern:

    • Statt .Display kannst du .Save verwenden, um die E-Mail als Entwurf zu speichern.

Tipps für Profis

  • Verwende Variablen für die häufig verwendeten E-Mail-Adressen, um den Code lesbarer zu machen.

  • Fehlerbehandlung: Implementiere eine Fehlerbehandlung, um unerwartete Probleme zu vermeiden. Beispiel:

    On Error Resume Next

  • Anpassen der E-Mail-Inhalte: Du kannst den Text des E-Mail-Inhalts dynamisch aus verschiedenen Zellen oder Datenquellen abrufen.

FAQ: Häufige Fragen

1. Kann ich das Makro für Outlook 365 verwenden? Ja, das Makro funktioniert mit Outlook 365, solange VBA unterstützt wird.

2. Wie kann ich das Makro für eine bestimmte Excel-Version anpassen? Die oben genannten Schritte sollten in den meisten Excel-Versionen funktionieren. Achte darauf, dass deine Excel-Version VBA unterstützt.

3. Was mache ich, wenn keine E-Mail geöffnet wird? Überprüfe, ob Outlook als Standard-E-Mail-Anwendung festgelegt ist und dass Makros in Excel aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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