Clase CustomProperties (Excel VBA)

Una colección de objetos CustomProperty que representa información adicional. Para usar una variable de clase CustomProperties, primero debe ser instanciado, por ejemplo

Dim cps as CustomProperties
Set cps = ActiveSheet.CustomProperties

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos CustomProperties en una colección.

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

Add

Agrega información sobre propiedades personalizadas.

Add (Name, Value)

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

Arguments

Estos son los argumentos con nombre :

Name (String) - Nombre de la propiedad personalizada.

Value (Variant) - Valor de la propiedad personalizada.

Count

Devuelve un valor Long que representa el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveSheet.CustomProperties.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice del objeto.

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