Classe CustomProperty (Excel VBA)

A classe CustomProperty representa informações de identificador, que podem ser usadas como metadados para XML.

Set

Para usar uma variável de classe CustomProperty, ela primeiro precisa ser instanciada por exemplo

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

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo CustomProperty: Worksheet.CustomProperties, CustomProperties.Item e CustomProperties.Add

For Each

Aqui está um exemplo de processamento dos itens CustomProperty em uma coleção.

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

CustomProperties.Add

Adiciona informações sobre a propriedade personalizada.

Sintaxe : expression.Add (Name, Value)

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

Arguments

O seguinte argumento é opcional

Name (String) - O nome da propriedade personalizada.

Value (Variant) - O valor da propriedade personalizada.

CustomProperties.Count

Retorna um valor Long que representa o número de objetos na coleção.

Dim lngCount As Long
lngCount = ActiveSheet.CustomProperties.Count

CustomProperties.Item

Retorna um único objeto de uma coleção.

Sintaxe : expression.Item (Index)

Index: O número de índice do objeto.

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

CustomProperties.Parent

Retorna o objeto pai do objeto especificado. Somente leitura.

Delete

Exclui o objeto.

É possível excluir propriedades personalizadas do documento, mas não uma propriedade interna do documento.

ActiveSheet.CustomProperties(1).Delete

Name

Retorna ou define um valor String que representa o nome do objeto.

ActiveSheet.CustomProperties(1).Name =

Parent

Retorna o objeto pai do objeto especificado. Somente leitura.

Value

Sinônimo da propriedade Borders. LineStyle .

ActiveSheet.CustomProperties(1).Value =