Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Stellt die Definition einer benutzerdefinierten Eigenschaft für ein Folder -Objekt dar.
Hinweise
Verwenden Sie UserDefinedProperties (Index), wobei index ein Name oder eine Indexnummer ist, um ein einzelnes UserDefinedProperty-Objekt zurückzugeben.
Verwenden Sie die Add -Methode der UserDefinedProperties -Auflistung für ein Folder -Objekt, um eine benutzerdefinierte Eigenschaft für diesen Ordner zu definieren.
Verwenden Sie die Type -Eigenschaft, um den benutzerdefinierten Eigenschaftentyp und der DisplayFormat -Eigenschaft, um das Anzeigeformat für die benutzerdefinierte Eigenschaft zurückgeben zurückzugeben. Wenn die Type -Eigenschaft auf OlCombination oder OlFormula festgelegt ist, verwenden Sie die Formula -Eigenschaft, um die Formel zum Generieren von Werten für die benutzerdefinierte Eigenschaft zurückzugeben.
UserDefinedProperty -Objekt stellt nur die Definition einer benutzerdefinierten-Eigenschaft, die auf alle im Ordner enthaltenen Outlook-Elemente angewendet ist. Verwenden Sie zum Abrufen oder Ändern der Eigenschaftswerte für ein Outlook-Element in dem Ordner, der UserProperties -Eigenschaft des Outlook-Elements, wie ein MailItem -Objekt zum Abrufen der UserProperties -Auflistung für das Element. Klicken Sie dann können das UserProperty -Objekt für die entsprechende benutzerdefinierte Eigenschaft zum Abrufen oder ändern Sie den Wert der benutzerdefinierten Eigenschaft für das Outlook-Element.
Beispiel
Im folgenden Beispiel für Visual Basic für Applikationen (VBA) werden neben dem Namen eines angegebenen Folder-Objekts auch der Name und Typ der einzelnen UserDefinedProperty-Objekte, die in der UserDefinedProperties-Auflistung des angegebenen Folder-Objekts enthalten sind, im Direktfenster angezeigt.
Sub DisplayUserProperties(ByRef FolderToCheck As Folder)
Dim objProperty As UserDefinedProperty
' Print the name of the specified Folder object
' reference to the Immediate window.
Debug.Print "--- Folder: " & FolderToCheck.Name
' Check if there are any user-defined properties
' associated with the Folder object reference.
If FolderToCheck.UserDefinedProperties.Count = 0 Then
' No user-defined properties are present.
Debug.Print " No user-defined properties."
Else
' Iterate through every user-defined property in
' the folder.
For Each objProperty In FolderToCheck.UserDefinedProperties
' Retrieve the name of the user-defined property.
strPropertyInfo = objProperty.Name
' Retrieve the type of the user-defined property.
Select Case objProperty.Type
Case OlUserPropertyType.olCombination
strPropertyInfo = strPropertyInfo & " (Combination)"
Case OlUserPropertyType.olCurrency
strPropertyInfo = strPropertyInfo & " (Currency)"
Case OlUserPropertyType.olDateTime
strPropertyInfo = strPropertyInfo & " (Date/Time)"
Case OlUserPropertyType.olDuration
strPropertyInfo = strPropertyInfo & " (Duration)"
Case OlUserPropertyType.olEnumeration
strPropertyInfo = strPropertyInfo & " (Enumeration)"
Case OlUserPropertyType.olFormula
strPropertyInfo = strPropertyInfo & " (Formula)"
Case OlUserPropertyType.olInteger
strPropertyInfo = strPropertyInfo & " (Integer)"
Case OlUserPropertyType.olKeywords
strPropertyInfo = strPropertyInfo & " (Keywords)"
Case OlUserPropertyType.olNumber
strPropertyInfo = strPropertyInfo & " (Number)"
Case OlUserPropertyType.olOutlookInternal
strPropertyInfo = strPropertyInfo & " (Outlook Internal)"
Case OlUserPropertyType.olPercent
strPropertyInfo = strPropertyInfo & " (Percent)"
Case OlUserPropertyType.olSmartFrom
strPropertyInfo = strPropertyInfo & " (Smart From)"
Case OlUserPropertyType.olText
strPropertyInfo = strPropertyInfo & " (Text)"
Case OlUserPropertyType.olYesNo
strPropertyInfo = strPropertyInfo & " (Yes/No)"
Case Else
strPropertyInfo = strPropertyInfo & " (Unknown)"
End Select
' Print the name and type of the user-defined property
' to the Immediate window.
Debug.Print strPropertyInfo
Next
End If
End Sub
Methoden
Name |
---|
Delete |
Eigenschaften
Name |
---|
Application |
Klasse |
DisplayFormat |
Formula |
Name |
Parent |
Session |
Type |
Siehe auch
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.