Klasse CustomProperties (Excel VBA)
Eine Auflistung von CustomProperty -Objekten, die zusätzliche Informationen darstellt. Um eine CustomProperties -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim cps as CustomProperties
Set cps = ActiveSheet.CustomProperties
For Each
Hier ist ein Beispiel für die Verarbeitung der CustomProperties -Elemente in einer Sammlung
Dim cprpCustomPropertie As CustomProperty
For Each cprpCustomPropertie In ActiveSheet.CustomProperties
Next cprpCustomPropertie
Add
Fügt Informationen zu benutzerdefinierten Eigenschaften hinzu.
Dim strName As String: strName =
Dim cprp As CustomProperty
Set cprp = ActiveSheet.CustomProperties.Add(Name:=strName, Value:=)
Arguments
Hier sind die benannte Argumente :
Name (String) - Der Name der benutzerdefinierten Eigenschaft.
Value (Variant) - Der Wert der benutzerdefinierten Eigenschaft.
Count
Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.
Dim lngCount As Long
lngCount = ActiveSheet.CustomProperties.Count
Item
Gibt ein einzelnes Objekt aus einer Auflistung zurück.
Item (Index)
Index: Die Indexnummer des Objekts.
Dim cprpItem As CustomProperty
Set cprpItem = ActiveSheet.CustomProperties(Index:=1)