Adressbuch per VBA auslesen

[lidZ1]

Hallo zusammen,

Gibt es eine Möglichkeit mir per VBA aus dem Lono Adressbuch einen Namen zu suchen und die Lono Adresse davon auszugeben ?

Mein Ansatz um auf das Adressbuch zuzugreifen:
Code:

Private Sub CommandButton1_Click()

Dim s As Object
Set s = CreateObject("Notes.NotesSession")

Dim db As Object
Dim view As Object
Dim doc As Object
Dim feld As Object
Dim i As Long

Set db = s.GetDatabase("mail01", "names.nsf")
Set view = db.GetView("People")

[koehlerbv]

1. Ja.

2. Es dürfte eher suboptimal sein, eine Sub zu verwenden, wenn man Parameter und ein Ergebnis braucht  

[lidZ1]

Wie kann man das denn am besten umsetzen? Möchte vermeiden, das in der Exceltabelle die Lono adresse falsch eingetragen werden.

Die Adressen werden zum Automatischen verschicken von einer Lono aus Excel verwendet.

[lidZ1]

Kann man denn irgendwie die eingegebene Adresse überprüfen lassen, und nur mit einer MsgBox über die Falscheintragung informieren?