Classe CustomProperties (Excel VBA)

Collection d'objets CustomProperty qui représente des informations supplémentaires. Pour utiliser une variable de classe CustomProperties, elle doit d'abord être instanciée, par exemple

Dim cps as CustomProperties
Set cps = ActiveSheet.CustomProperties

For Each

Voici un exemple de traitement des éléments CustomProperties dans une collection

Dim cprpCustomPropertie As CustomProperty
For Each cprpCustomPropertie In ActiveSheet.CustomProperties
	
Next cprpCustomPropertie

Add

Cette méthode ajoute des informations de propriété personnalisée.

Add (Name, Value)

Dim strName As String: strName = 
Dim cprp As CustomProperty
Set cprp = ActiveSheet.CustomProperties.Add(Name:=strName, Value:=)

Arguments

Les arguments nommés :

Name (String) - Nom de la propriété personnalisée.

Value (Variant) - Valeur de la propriété personnalisée.

Count

Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveSheet.CustomProperties.Count

Item

Cette méthode renvoie un seul objet d'une collection.

Item (Index)

Index: Numéro d'index de l'objet.

Dim cprpItem As CustomProperty
Set cprpItem = ActiveSheet.CustomProperties(Index:=1)