Classe Sources (Word VBA)
A classe Sources representa uma coleção de objetos Source . Para usar uma variável de classe Sources, ela primeiro precisa ser instanciada por exemplo
Dim srcs as Sources
Set srcs = Application.Bibliography.Sources
For Each
Aqui está um exemplo de processamento dos itens Sources em uma coleção.
Dim src As Source
For Each src In Application.Bibliography.Sources
Next src
Add
Adiciona uma nova fonte às fontes relacionadas na caixa de diálogo Gerenciador de Fontes.
Add (Data)
Data: Uma sequência de caracteres XML que representa os valores do campo para a nova fonte.
Dim strData As String: strData =
Application.Bibliography.Sources.Add Data:=strData
Count
Retorna o número de itens na coleção de fontes. Somente leitura Long.
Dim lngCount As Long
lngCount = Application.Bibliography.Sources.Count
Item
Retorna um objeto Source que representa o item especificado na coleção.
Item (Index)
Index: Especifica a posição ordinal do objeto na coleção.
Dim src As Source
Set src = Application.Bibliography.Sources(Index:=1)