ich hab von Rainers/Ramses´ seite den code hier:
Sub Read_Contact_from_Outlook()
'by Ramses
'Liest alle Kontakte aus Outlook in das aktuelle Tabellenblatt
Dim myOlk As Object
Dim myOlkContact As Object
Set myOlk = CreateObject("outlook.application")
Set myOlkContact = myOlk.CreateItem(olContactItem)
Range("A2").Select
For Each myOlkContact In myOlk.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts).Items
With myOlkContact
ActiveCell.Value = .LastName
ActiveCell.Offset(0, 1).Value = .FirstName
ActiveCell.Offset(0, 2).Value = .BusinessAddressStreet
ActiveCell.Offset(0, 4).Value = .BusinessAddressCity
ActiveCell.Offset(0, 3).Value = .BusinessAddressPostalCode
ActiveCell.Offset(0, 5).Value = .BusinessAddressCountry
ActiveCell.Offset(0, 6).Value = .BusinessAddressState
ActiveCell.Offset(0, 7).Value = .Email1Address
'Alle verfügbaren Eigenschaften eines Kontaktes
'---Outlook 2000 / 2002
'.Actions
'.Anniversary
End With
ActiveCell.Offset(1, 0).Select
Next
Set myOlkContact = Nothing
Set myOlk = Nothing
End Sub
VBA nein ist auch nich grad war ;)
nur will ich mich bei dem problem hier nicht unbedingt als gut hinstellen, da man bei VBA_Gut IMHO schon mit anderen MS programmen interagieren sollte...
mein problem ist nun, dass ich 1. die daten, die ich brauche nicht in den kontakten liegen, sondern im persönlichen adressbuch... selbiges wenn ich versuche zu importieren, endet eigentlich nur in einem schlamassel aus irgendwelchen zeichen wo irgendwo mal ein lesbarer name erscheint, aber nichts wirklich brauchbares zum filtern.
und der code von ramses bricht mir bei 2 verschiedenen rechnern mit 2 verschiedenen fehlermeldungen ab...
einmal mit laufzeitfehler:
438 objekt unterstützt diese methode oder eigentschaft nicht...
und einmal mit:
-2546414984 laufzeitfehler, dass mind. ein objekt ungültig ist...
im VBE sind die outlook objektbibliotheken angehakt, also sollte er ja die prozeduren und eigenschaften finden, aber irgendwas schießt quer...
schonmal danke im voraus
c0bRa
Zusammengesetzt ergeben die Rechtschreibfehler ein Geheimrezept, wie man aus Wasser Bier machen kann...