Hallo Ihr Wissenden da draußen!
Wer weiss, wie man man bei MS-Outlook die Routine für ein neues Kontaktformular richtig schreibt. Habe ein neues Formular erstellt und möcht nun, dass alle bisherigen Kontakte in meinem Kontaktordner in dieses Formular umgeschrieben werden, ohne dies für jeden Kontakt manuell machen zu müssen. Leider passiert aber nichts. Meine Visual Basic Editor- Eingabe sieht laut Outlook2002-Handbuch so aus:
Sub Formularaendern()
Set olApp = New Outlook.Application
Set olNS = olApp.GetNamespace(„MAPI“)
Set ContactsFolder = _
olNS.GetDefaultFolder(olFolderContacts)
Set ContactItems = ContactsFolder.Items
For Each Itm In ContactItems
If Itm.MessageClass „IPM.Contact.MPCKontaktformularneu“ Then
Itm.MessageClass = „IPM.Contact.MPCKontaktformularneu“
Itm.Save
End If
Next
End Sub
Was mache ich falsch?
Matthias