Klasse RecentFile (Word VBA)

Die Klasse RecentFile stellt eine zuletzt geöffnete Datei dar.

Die wichtigste Prozeduren der Klasse RecentFile sind Delete, Open und RecentFiles.Add

Set

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

Dim rcnfl as RecentFile
Set rcnfl = RecentFiles(Index:=1)

Die folgenden Prozeduren können zum Festlegen der RecentFile Klassenvariablen verwendet werden : RecentFiles.Add, RecentFiles.Item und Application.RecentFiles

For Each

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

Dim rcnfl As RecentFile
For Each rcnfl In RecentFiles
	
Next rcnfl

Methoden

Die Hauptmethoden der Klasse RecentFile sind

Delete - Löscht die angegebene Datei in der Liste der zuletzt verwendeten Dateien.

RecentFiles(1).Delete

Open - Öffnet das angegebene Objekt.

Dim doc As Document
Set doc = RecentFiles(1).Open()

RecentFiles.Add - Gibt ein Recent File-Objekt zurück, das eine Datei darstellt, die der Liste der zuletzt verwendeten Dateien hinzugefügt wurde.

Dim rcnfl As RecentFile
Set rcnfl = RecentFiles.Add(Document:=)

Eigenschaften

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

Dim lngIndex As Long
lngIndex = RecentFiles(1).Index

Name Gibt den Namen des angegebenen Objekts zurück.

Dim strName As String
strName = RecentFiles(1).Name

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

Dim objParent As Object
Set objParent = RecentFiles(1).Parent

Path Gibt den Datenträger oder Webpfad zu dem angegebenen Objekt zurück.

Dim strPath As String
strPath = RecentFiles(1).Path

ReadOnly True, wenn Änderungen am Dokument nicht im Originaldokument gespeichert werden können.

RecentFiles(1).ReadOnly = True

RecentFiles.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der zuletzt geöffneten Dateien in der Auflistung darstellt.

Dim lngCount As Long
lngCount = RecentFiles.Count

RecentFiles.Maximum Gibt die maximale Anzahl der zuletzt geöffneten Dateien zurück, die im Menü Datei angezeigt werden können, oder legt sie fest.

RecentFiles.Maximum =

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

Dim objParent As Object
Set objParent = RecentFiles.Parent