Klasse EmailSignatureEntry (Word VBA)

Die Klasse EmailSignatureEntry stellt einen einzelnen e-Mail-Signatur Eintrag dar.

Set

Um eine EmailSignatureEntry -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim ese as EmailSignatureEntry
Set ese = Application.EmailOptions.EmailSignature.EmailSignatureEntries(Index:=1)

Die folgenden Prozeduren können zum Festlegen der EmailSignatureEntry Klassenvariablen verwendet werden : EmailSignature.EmailSignatureEntries, EmailSignatureEntries.Add und EmailSignatureEntries.Item

For Each

Hier ist ein Beispiel für die Verarbeitung der EmailSignatureEntry -Elemente in einer Sammlung

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

EmailSignatureEntries.Add

Gibt ein EmailSignatureEntry -Objekt zurück, das einen neuen e-Mail-Signatur Eintrag darstellt.

Eine e-Mail-Signatur ist Standardtext, der eine e-Mail-Nachricht endet, beispielsweise Ihren Namen und Ihre Telefonnummer.

Syntax : expression.Add (Name, Range)

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

Arguments

Hier sind die benannte Argumente :

Name (String) - Der Name des e-Mail-Eintrags.

Range (Range) - Der Bereich im Dokument, der als Signatur hinzugefügt wird.

EmailSignatureEntries.Count

Gibt einen Wert vom Typ Long zurück, der die Anzahl der e-Mail-Signatur Einträge in der Auflistung darstellt.

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

EmailSignatureEntries.Item

Gibt ein einzelnes EmailSignatureEntry -Objekt in einer Auflistung zurück.

Syntax : expression.Item (Index)

Index: Das einzelne Objekt zurückgegeben werden soll.

Dim ese As EmailSignatureEntry
Set ese = Application.EmailOptions.EmailSignature.EmailSignatureEntries(Index:=1)

EmailSignatureEntries.Parent

Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen EmailSignatureEntries-Objekts darstellt.

Dim objParent As Object
Set objParent = Application.EmailOptions.EmailSignature.EmailSignatureEntries.Parent

Delete

Löscht die angegebene E-Mail-Signatur.

Application.EmailOptions.EmailSignature.EmailSignatureEntries(1).Delete

Index

Gibt einen Wert vom Typ Long zurück, der die Position eines Elements in einer Auflistung darstellt.

Dim lngIndex As Long
lngIndex = Application.EmailOptions.EmailSignature.EmailSignatureEntries(1).Index

Name

Gibt den Namen des angegebenen Objekts zurück oder legt ihn fest.

Application.EmailOptions.EmailSignature.EmailSignatureEntries(1).Name =

Parent

Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen EmailSignatureEntry-Objekts darstellt.

Dim objParent As Object
Set objParent = Application.EmailOptions.EmailSignature.EmailSignatureEntries(1).Parent