Live-Forum - Die aktuellen Beiträge
Datum
Titel
08.11.2025 15:24:59
Welche Masseinheit zeigt die Zeilenhöhe
08.11.2025 06:12:31
Automatisierte Grafische Lösung -Preisvergleich/ Ersparnis
07.11.2025 12:58:46
Fehlersuche Ereignismakro
07.11.2025 12:34:41
Datum aus Blatt- und Dateinamen bilden.
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
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Outlook Default-Kontakte-Ordner bei zwei Mailkonten

Forumthread: Outlook Default-Kontakte-Ordner bei zwei Mailkonten

Outlook Default-Kontakte-Ordner bei zwei Mailkonten
06.09.2023 09:35:23
Peter Braun
Ich möchte mit 

 With CreateObject("Outlook.Application")

  Set oOutContacts = .GetNamespace("MAPI").GetDefaultFolder(10)

    With oOutContacts.Items.Add

     .Lastname = XYZ

     ...     

     .Save


einen Kontakt im Outlook-Kontakteordner anlegen. Das klappt so weit auch gut ... nur nicht in dem gewünschten Kontakte-Ordner.

Ich habe zwei Konten in Outlook: mail-A@xyz.de und mail-B@xyz.de.
Für beide Konten hat Outlook je einen(Standard/Default-) Kontakte-Ordner angelegt.
Mit obigem Code wird der Kontakt im mail-A@xyz.de-Kontakte-Ordner [Name: "Kontakte (nur auf diesem Computer) mail-A@xyz.de"] abgelegt. Wie lege ich stattdessen den Kontakt im mail-B@xyz.de-Kontakte-Ordner [Name: "Kontakte (nur auf diesem Computer) mail-B@xyz.de"] ab?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Outlook Default-Kontakte-Ordner bei zwei Mailkonten
06.09.2023 10:23:50
Yal
Hallo Peter,

in einem solchen Fall, würde ich die Bibliothek anbinden, anstatt die Objekte mit CreateObject zu instanzieren: in VB-Editor, "Extras", "Verweise", Haken bei "Microsoft Outlook 22.0 Object Library".

Siehe sonst https://www.herber.de/forum/cgi-bin/callthread.pl?index=1936691 , weil Problem hinter der Frage sehr ähnlich.

VG
Yal
Anzeige
AW: Outlook Default-Kontakte-Ordner bei zwei Mailkonten
06.09.2023 10:49:55
Peter Braun
Prima! Danke. Biblio eingebunden und im genannten Thread auch das gefunden, was ich gesucht habe: 
Set Namespace = Outlook.GetNamespace("MAPI")

For Each Store In Namespace.Stores

    If Store.DisplayName = "XXX" Then

        Set Folder = Store.GetDefaultFolder(olFolderSentMail)

        Set objItems = Folder.Items

    End If

Next

Und schon das nächste Problem: wie gebe ich DisplayName = "Kontakt (nur auf diesem...) mail-B@xyz.de" korrekt an?
Oder anders: kann ich das Standard-Profil (mail-A@xyz.de) per VBA auf mail-B switchen bzw. temp. zum Standard-Konto machen ... dann zeigte GetDefaultFolder(10) ja dahin wo es soll?
Anzeige
AW: Outlook Default-Kontakte-Ordner bei zwei Mailkonten
06.09.2023 14:11:57
Yal
Hallo Peter,

wenn Du die Bibliothek angebunden hast, kannst Du auf die Bibliothek-Elemente in dem Objekt-Katalog anschauen: Ansicht, Objekt-Katalog, dann auf die passende Bib umschalten und die Objekte und Eigenschaften anschauen. Von da an, für den unklaren Begriff/Objekt in der Online-Hilfe springen, da gibt es meistens gute Beispiele.
So löst Du nicht nur dein aktuellen Problem, sondern gewöhnst dich eine gute Lösungsweg für alle deine künftige Fragen. Dann ist der "VBA bescheiden" auch bald upgegraded.

VG
Yal
Anzeige
AW: Outlook Default-Kontakte-Ordner bei zwei Mailkonten
06.09.2023 16:33:26
Peter Braun
Recht hast du: ich muss nicht Lösungen finden, sondern suchen lernen! Danke Yal!
;

Forumthreads zu verwandten Themen

Outlook Emails einlesen und löschen
Peter

Ich würde gerne den Outlook Posteingang in Excel einlesen und danach den Outlook Posteingang löschen.
Wie kann so etwas in VBA realisiert werden?
19.08.2008 18:20:00
Thread-ID: 1003019
3 Beiträge
Outlook Email einlesen/löschen
Peter

Ich bin zwar in der Lage Emails von Excel/VBA via Outlook abzusenden.
Jetzt würde ich jedoch gerne via VBA/Excel Emails einlesen, den Header der eingehenden Email auslesen und danach die Email wieder löschen.
Danke für die Unterstützung.
Grüße
Peter
29.08.2008 15:07:44
Thread-ID: 1005850
3 Beiträge
Email versenden Outlook - Problem
Peter

Ich versende via Excel/VBA alle 3 Minuten ein Email.
Nun kommt es ca. 1x am Tag vor, dass Outlook Emails nicht sofort sendet und sich die Emails im Postausgang sammeln bis ich Outlook schließe und wieder öffne.
Danke für die Unterstützung.
Grüße
Peter
29.09.2008 13:58:00
Thread-ID: 1013103
2 Beiträge
Anzeige
Email aus Excel über Outlook versenden
ray

Hallo,
ich plane grad neue Projekte und hab eine Frage, wo ich nur die Antwort aber keinen code brauche.
Ich möchte den Inhalt der Label oder textboxen von ein UserForm an Outlook übergeben und via Outlook versenden.
Dabei soll diese Mail in dem Outlookordner 'gesendete Objekte' e...
02.12.2008 10:35:00
Thread-ID: 1029428
3 Beiträge
Outlook-Mail aus Excel - Statusabfrage
Peter

Hallo,
aus Excel generiere ich Mail-Items mit nachfolgendem Code. Versendet werden diese durch manuelles Betätigen des "Senden"-Buttons. Gibt es eine Art Return-Code? Kann abgefragt werden, ob der "Senden"-"Button gedrückt wurde oder ob das Item ohne Senden geschlossen wurde?
Set MyOutA...
04.12.2008 14:07:27
Thread-ID: 1030167
6 Beiträge
Email über Outlook, Konto ändern
Nico

Hallo!
Ich schicke eine Email über ExcelVBA mit Outlook und dem Standardkonto.
Gibt es eine Möglichkeit die Email nicht über das Standardemailkonto zu verschicken, sondern über ein anderes Konto?
Wie kann ich das Konto vorher festlegen?
Sub EmailVerschickenKINDERSKIKURS() Dim...
16.12.2008 20:16:33
Thread-ID: 1033418
2 Beiträge
eMail aus Outlook in Excel einlesen
Heinzs

Hallo,
ich möchte eine in Outlook in einem bestimmten Ordner angekommene eMail in Excel weiterverarbeiten, d.h. wenn bestimmter Absender und bestimmter Betreff in bestimmten Ordner und bestimmtes Empfangsdatum vorliegt dann soll der Emailbody in die Exceltabelle ans Ende angefügt werden.
21.01.2009 15:36:17
Thread-ID: 1042242
3 Beiträge
Anzeige
Email an CC Verteiler
Alex

Hallo Excelisten,
ich habe eine Arbeitsmappe, wo nach Auswahl einer Firma die Arbeitsmappe an diese gesendet wird. Hierfür habe ich dann ein Tabellenblatt "Parameter" wo die E-Mailadressen der Empfänger hinterlegt sind.
Die VBA holt sich dann aus dem Tabellenblatt die nötige Emailadres...
27.04.2009 08:03:34
Thread-ID: 1071273
4 Beiträge
Serienmail Outlook
Ilka

Hallo,
ich bräuchte mal wieder eure Hilfe. Ich möchte an einen bestimmten Personenkreis eine Art Serienmail verschicken, zu der jeder einen individuellen Datei-Anhang erhalten soll.
D. h. bei Herrn Müller soll der Anhang A, bei Frau Mayer Anhang B und bei Herr Schmitt Anhang C automati...
27.04.2009 08:15:33
Thread-ID: 1071278
3 Beiträge
Anzeige
Outlookmail aus Excel versenden
Peter

Hallo
ich erstelle von Excel aus mit VBA ein neues Mail in Outlook und versende es
Auszug:
Text = "Hier die Dateien"
Bereich = Sheets("Basis").Range("F19:H23") '? in Text einfügen
Sheets("Basis").Range("F19:H23").Copy '? in Text einfügen
Se...
07.10.2009 09:33:30
Thread-ID: 1107734
2 Beiträge
Email mit Anhang versenden ueber outlook
abu

Hallo Zusammen,
habe folgenden Code gefunden und wuerde den gerne fuer meine Beduerfnisse umstricken. Leider bekomme ich immer eine Fehlermeldung bei dieser Zeile:
.SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
Wuerde mich ueber hilfe sehr freuen...
16.12.2009 13:28:45
Thread-ID: 1122907
2 Beiträge
Email aus Excel mit bestimmten Outlookformular | Herbers Excel-Forum
Ewald Sadowski
Hallo
habe mal wieder eine Aufgabe aber keine Lösung (um nicht von Problem zu sprechen)
In einem Makro habe ich folgende Anweisung, das Outlook ein bestimmtes Formular öffnet. Sub Emails_mit_Formular() Dim OutLookJob As Object, mymail As Object Set OutLookJob = CreateObject("Outlook.Applic...
23.01.2010 19:34:38
Thread-ID: 1132372
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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