Office: (Office 2013) Outlook Kontakte (.Categories)

Hallo zusammen,

ich möchte von Access zu Outlook Kontakte senden.
Dies funktioniert auch mit Vornamen oder Nachnamen gut. Doch leider komme ich mit den Kategorien (.Categories) nicht weiter.

Folgenden Code benutze ich:

Code:

Ich benutze eine Tabelle Namens tblKontakte dort stehen unter anderem:
- Vorname
- Nachname
- PLZ
- Ort drin,
in der Tabelle steht auch die Kategorie der Person drin, die aber mit einer anderen Tabelle und zwar mit der Tabelle tblOutlookkategorien als Kombinationsfeld verknüpft ist.

Das alles wird auf dem Formular frmKontakt zusammen gestellt.

Problem ist folgendes, so wie ich das Kombinationsfeld (OutlookkategorieID) jetzt per VBA anspreche bekomme ich in Outlook nur die ID der Kategorie und nicht den Namen der Kategorie.

Die Tabelle Outlookkategorien ist so aufgebaut:
ID | Outlookkategorie
64 Hauseigentümer

Es wäre toll wenn ihr mir wieder helfen könntet.

Mit freundlichen Grüßen

AccUser2013

:)

 

Nz(rstKontakte!OutlookkategorieID) liefert die ID... wenn Du den Klartext haben möchtest, solltest Du auf das entsprechende Feld zugreifen; wenn es im zugrunde liegenden RecordSet nicht enthalten ist, wäre z.B. der Zugriff per DLookUp denkbar.

 

Danke für den Hinweis,

nun funktioniert es das ich den Namen der Kategorie habe und nicht mehr die ID, allerdings schreibt mir Access unendlich viele Kontakte in Outlook.

Leider finde ich nicht den Fehler, damit Access meine 3 Kontakte in der Tabelle nur jeweils 1 Mal in Outlook kopiert. Es müsste irgendwo ein End/Stopp fehlen? Leider bin ich dafür nicht erfahren genug.

Hier der benutzte Code:

Code:

Mit freundlichen Grüßen

AccUser2013

 

Dazu solltest Du am besten mal die 3fach verschachtelte Loop-Anweisung in Einzelschritten durchgehen...

 

Danke CptChaos,

habe es gestern die ganze Zeit versucht die 3 Fache verschachtelte Loop-Anweisung zu beeinflussen, leider ohne Erfolg.
Entweder ich bekomme unendlich viele Kontrakte in Outlook oder ich bekomme garkein.

Hab mir diese Internetseite als Hilfe dazu geholt, aber bin nicht weiter gekommen.
Kannst du mir noch einen Tipp geben wie ich das Problem vielleicht anders beheben könnte ?

Mit freundlichen Grüßen

AccUser2013

 

In der ersten Schleife (Do While Not rstOutlook.EOF) wird für jede Kategorie die in tblOutlookkategorien erfasst ist etwas gemacht (20 Kategorien bedeutet 20 Aktionen).

In der zweiten Schleife (Do While Not rstKontakte.EOF) wird für jeden Kontakt in der Tabelle tblKontakte ein entsprechender Kontakt in Outlook angelegt.

Ich vermute, dass die Schleife für die Kategorien auf der falschen Ebene (ausserhalb des expliziten Kontakt) statt findet; die gehört m.E. in die Kontaktschleife da du sonst z.B. für den Kontakt A für jede Kategorie einen eigenen Eintrag erzeugst.
Das solltest Du jedoch selbst rausbekommen können, wenn Du den Code in Einzelschritten durchgehst bzw. das Ergebnis in Outlook kontrollierst; evtl. ist es einfacher erstmal mit einer Teilmenge der Kontakte (und Kategorien) zu arbeiten um den Überblick zu behalten

 

Bekomme es leider nicht hin, egal wie ich es dreh und wende, es kommt nicht das gewünschte Ergebnis heraus.
Hätte nicht gedacht das die Kategorien so schwer sind, ich meine alles andere Vorname etc. geht spielend einfach.

Früher oder später wird es hier wohl in der Job-Börse wieder zu finden sein, ist mir nämlich ein wichtiges Anliegen.

Danke für deine Unterstützung und Zeit.

Mit freundlichen Grüßen

AccUser2013

 

Nochmal: Das hat nichts mit den Kategorien zu tun sondern mit den Schleifen die Du hier drehst...

Kannst Du eine BeispielDB hochladen in der das Verhalten reproduzierbar ist; dann schau ich mir das gerne an.

 

Das hört sich fantastisch an, ich werde heute Nachmittag oder heute Abend sie dir zur Verfügung stellen, ich schreibe dir dann eine Private Nachricht.

Mit freundlichen Grüßen

AccUser2013

 

Guten Morgen,

ich werde den Ratschlag von CptChaos befolgen und hier nochmal Allgemein nach Hilfe fragen.
Dazu werde ich die Datenbank zur Verfügung stellen. Es wäre super, wenn ihr mir mit diesem Problem helfen könntet.


Mit freundlichen Grüßen

AccUser2013

 

Verstehe ich es richtig, dass Du "nur" die Daten aus tblKontakte als Outlookkontakte in einen zuvor ausgewählten Ordner übernehmen willst?
Diesem sollen "alle" Kategorien aus tblKontaktkategorien übergeben werden?

 

Ein Ja reicht hier, denn dein Satz ist genau das was ich will.

Mit den anderen Textfeldern, wie Vorname, Nachname funktioniert es aber leider nicht mit den Kategorien.

Mit freundlichen Grüßen

AccUser2013

 

Erstellt der folgende Code bei Dir genau einen Eintrag Max Muster mit den Kategorien Kategorie1 und Kategorie2 ?
Code:

 

Ja, Access er erstellt in Outlook einen Kontakt Namens Max Muster und dieser Kontakt ist in 2 Kategorien, nämlich in Kategorie1 u. Kategorie2.

Mit freundlichen Grüßen

AccUser2013

 

Ok, also geht es "nur" noch darum, die Kategortien zu "verketten".
Schau Dir mal http://www.dbwiki.net/wiki/VBA_Tipp:...r_SQL_aufbauen an; dort wird gezeigt, wie Du ein solche Liste, Trennzeichen ";", aufbaust. Den entsprechenden Wert kannst Du dann für die Kategorien verwenden.