Classe CustomProperty (Excel VBA)

La classe CustomProperty représente les informations relatives aux identificateurs, qui peuvent être utilisées en tant que métadonnées pour XML.

Set

Pour utiliser une variable de classe CustomProperty, elle doit d'abord être instanciée, par exemple

Dim cprp as CustomProperty
Set cprp = ActiveSheet.CustomProperties(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe CustomProperty : Worksheet.CustomProperties, CustomProperties.Item et CustomProperties.Add

For Each

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

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

CustomProperties.Add

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

Syntaxe : expression.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.

CustomProperties.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

CustomProperties.Item

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

Syntaxe : expression.Item (Index)

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

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

CustomProperties.Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Delete

Cette méthode supprime l'objet.

Vous pouvez supprimer des propriétés de document personnalisées, mais vous ne pouvez pas supprimer une propriété de document prédéfinie.

ActiveSheet.CustomProperties(1).Delete

Name

Cette propriété renvoie ou définit une valeur de type String qui représente le nom de l'objet.

ActiveSheet.CustomProperties(1).Name =

Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Value

Synonyme de la propriété Borders. LineStyle .

ActiveSheet.CustomProperties(1).Value =