[VBA/98] Outlook 2000: Aktives ContactItem

Hi,
ich will, daß mein Script auf Knopfdruck mit dem ausgewählten Kontakt was anfängt, wo finde ich, welcher Kontakt gerade gewählt wurde?

So etwa:
Set olFolder = olNS.GetDefaultFolder(olFolderContacts)
Set olKontakt = olFolder.Items( ? )

Was muß beim Fragezeichen hin, hab weder in der Hilfe was gefunden, noch in Büchern.

Ralph