Classe EmailSignatureEntries (Word VBA)

Uma coleção de objetos EmailSignatureEntry que representa todas as entradas de assinatura de email disponíveis para o Word. Para usar uma variável de classe EmailSignatureEntries, ela primeiro precisa ser instanciada por exemplo

Dim eses as EmailSignatureEntries
Set eses = Application.EmailOptions.EmailSignature.EmailSignatureEntries

For Each

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

Dim ese As EmailSignatureEntry
For Each ese In Application.EmailOptions.EmailSignature.EmailSignatureEntries
	
Next ese

Add

Retorna um objeto EmailSignatureEntry que representa uma nova entrada de assinatura de email.

Uma assinatura de email é o texto padrão que termina uma mensagem de email, como seu nome e número de telefone. Use a propriedade EmailSignatureEntries para criar e gerenciar uma coleção de assinaturas de email que o Microsoft Word usará ao criar mensagens de email.

Add (Name, Range)

Sub NewSignature() 
 Application.EmailOptions.EmailSignature _ 
 .EmailSignatureEntries.Add _ 
 Name:=ActiveDocument.BuiltInDocumentProperties("Author"), _ 
 Range:=Selection.Range 
End Sub

Arguments

O seguinte argumento é opcional

Name (String) - O nome da entrada de email.

Range (Range) - O intervalo no documento que será adicionado como assinatura.

Count

Retorna um Long que representa o número de entradas de assinatura de email na coleção. Somente leitura.

Dim lngCount As Long
lngCount = Application.EmailOptions.EmailSignature.EmailSignatureEntries.Count

Item

Retorna um objeto EmailSignatureEntry 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 ese As EmailSignatureEntry
Set ese = Application.EmailOptions.EmailSignature.EmailSignatureEntries(Index:=1)