Freigeben über

Ändern des von in einem Ordner vorhandenen Elementen verwendeten Formulars

  • Artikel

In manchen Fällen müssen Sie möglicherweise das Formular verändern, dem Elemente zugeordnet sind, die bereits in einem Ordner vorhanden sind. Dies ist häufig nach dem Importieren von Elementen erforderlich oder wenn Sie ein benutzerdefiniertes Formular erstellen, nachdem Sie bereits Elemente auf der Grundlage eines Outlook-Standardformulars erstellt haben.

Das Feld Nachrichtenklasse kann nicht direkt mithilfe der Outlook-Benutzeroberfläche verändert werden, Sie können aber VBScript, Visual Basic oder Visual Basic für Applikationen verwenden, um das Feld Nachrichtenklasse zu ändern.

Sie können den folgenden Automationscode als Grundlage verwenden, um Ihre eigenen Lösungen zu entwickeln. Dieser Code setzt voraus, dass der Name des neuen Formulars MyForm lautet. It will change all contacts in your default contacts folder so that they will use MyForm.

Sub ChangeMessageClass() 
Set olNS = Application.GetNameSpace("MAPI") 
Set ContactsFolder = _ 
 olNS.GetDefaultFolder(olFolderContacts) 
Set ContactItems = ContactsFolder.Items 
 
For Each Itm in ContactItems 
 If Itm.MessageClass <> "IPM.Contact.MyForm" Then 
 Itm.MessageClass = "IPM.Contact.MyForm" 
 Itm.Save 
 End If 
Next 
End Sub

Hinweis Wenn Sie einen anderen Ordner als einen Standardordner verwenden möchten, verwenden Sie das Folders-Auflistungsobjekt, um auf einen beliebigen Ordner zu verweisen, der in Ihrer Ordnerliste verfügbar ist.

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.