Classe CaptionLabels (Word VBA)

Uma coleção de objetos CaptionLabel que representa os rótulos de legenda disponíveis. Os itens da coleção CaptionLabels são listados na caixa rótulo na caixa de diálogo de legenda. Para usar uma variável de classe CaptionLabels, ela primeiro precisa ser instanciada por exemplo

Dim cls as CaptionLabels
Set cls = CaptionLabels

For Each

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

Dim cll As CaptionLabel
For Each cll In CaptionLabels
	
Next cll

Add

Retorna um objeto CaptionLabel que representa um nome de legenda personalizado.

Add (Name)

Name: O nome de legenda personalizado.

Sub CapLbl() 
 CaptionLabels.Add Name:="Demo Slide" 
End Sub

Count

Retorna um Long que representa o número de rótulos de legenda na coleção. Somente leitura.

Dim lngCount As Long
lngCount = CaptionLabels.Count

Item

Retorna um objeto CaptionLabel individual em uma coleção.

Item (Index)

Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal ou uma cadeia de caracteres que representa o nome do objeto individual.

Dim cll As CaptionLabel
Set cll = CaptionLabels(Index:=1)