Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
784to788
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
784to788
784to788
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Komm leider mit anderer Version nicht weiter...

Komm leider mit anderer Version nicht weiter...
31.07.2006 13:13:59
Rolf
Hallo,
Vorgestern hab ich von euch ein "Adreesen von Outlook in Excel TextBox einfügen"-Makro bekommen. Lieder komme ich mit dem so nicht zum Ziel!
Ich möchte desshalb gerne das Makro (Link unten) etwas abändern. (Damit ich auch die vielen Optionen wie FirstName, BuissnesAdrdressCity usw. gebrauchen kann, was bisher mit den anderen Makro nicht klappt!)
Aber das Adressbuch von mit Heisst "Partner-Adressen". Kann mir jemand das so Ändern, das nicht auf mein privates Adressbuch, sondern auf Partneradressen zugegriffen wird? Oder wenigstens erklären wo man was ändern muss!
https://www.herber.de/bbs/user/28447.xls
Danke
Rolf
Alter Thread: https://www.herber.de/forum/messages/786093.html

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Komm leider mit anderer Version nicht weiter...
31.07.2006 15:25:24
Rolf
Hi Forum,
Ich weiss nicht, wesshalb ich keine Antwort bekomme, ob das Problem schwer ist, oder nicht lösbar, oder ob ich einfach zu wenig erklärt habe, also versuche ich es noch einmal besser:
Das Makro aus dem Link oben funktioniert soweit gut. Das Problem daran ist, dass es auf mein privates Adressbuch zugreift. Ich hätte jedoch gerne, dass es auf das Adressbuch "Partner-Adressen" zugreift, das bei mir existiert (Kontake von Lieferanten).
Ich denke, dazu muss ich folgende Zeile des Makros ändern:
Set Verz = olMAPI.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts)
Leider weiss ich nicht ganu, wie, da mir "MAPI" und "olFolderContacts" nichts sagen...
Wäre um jede kleine Hilfe froh, die Ihr mir bieten könntet!
Vielen lieben Dank!
Rolf
Anzeige
AW: Komm leider mit anderer Version nicht weiter..
31.07.2006 17:19:10
Hans
Hallo Rolf,
hier wird sich kaum jemand einmischen, der vorher nichts damit zu tun hatte. Ich würde das Verzeichnis wie folgt festlegen
Set objAddressList = objOutlook.Session.AddressLists("Partner-Adressen")
Allerdings eben ausgehend von meinem vor einigen Tagen in einer Beispielarbeitsmappe hinterlegten Code. Ob das im aktuellen Code funktioniert, muss getestet werden:
Set Verz = olMAPI.GetNamespace("MAPI").AddressLists("Partner-Adressen")
oder so ähnlich.
Notfalls muss der Verfasser ran.
gruss hans

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige