title image


Smiley Re: Kontakte in Outlook via VB einfügen
ganz einfach eigentlich: Dim objOutlook As New Outlook.Application Dim objContact As ContactItem ''''''''''''''''' Dim objNameSpace As NameSpace Set objNameSpace = objOutlook.GetNamespace("MAPI") ''''''''''''''''' Dim objFolder As MAPIFolder Set objFolder = objNameSpace.GetDefaultFolder(olFolderContacts)Dim conOutLook As ObjectSet conOutLook = objOutlook.CreateItem(olContactItem)With conOutLook .Title = "Herr" If Trim(tabelle.Fields("Name")) "" .LastName = "Roder".saveend withund nun noch...... set nothing fuer Objektvariablen...

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: