Classe RecentFiles - a lista de arquivos utilizados recentemente (Word VBA)

Uma coleção de objetos RecentFile que representa os arquivos que foram usados recentemente. Os itens da coleção RecentFiles são exibidos na parte inferior do menu arquivo. Para usar uma variável de classe RecentFiles, ela primeiro precisa ser instanciada por exemplo

Dim rfs as RecentFiles
Set rfs = RecentFiles

For Each

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

Dim rcnfl As RecentFile
For Each rcnfl In RecentFiles
	
Next rcnfl

Add

Retorna um objeto RecentFile que representa um arquivo adicionado à lista de arquivos usados recentemente.

Add (Document, ReadOnly)

If ActiveDocument.Saved = True Then 
 RecentFiles.Add Document:=ActiveDocument.Name 
End If

Arguments

O seguinte argumento é necessário

Document (Document) - O documento que você deseja adicionar à lista de arquivos usados recentemente. Você pode especificar esse argumento usando o nome de cadeia de caracteres para o documento ou um objeto Document .

Optional arguments

The following argument is optional

ReadOnly (Boolean) - True para tornar o documento somente leitura.

Count

Retorna um Long que representa o número de arquivos recentes na coleção. Somente leitura.

Dim lngCount As Long
lngCount = RecentFiles.Count

Item

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

Item (Index)

Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal do objeto individual.

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

Maximum

Retorna ou define o número máximo de arquivos recentemente usados que podem aparecer no menu arquivo. Pode ser um número de 0 zero a 9. Long de leitura/gravação.

RecentFiles.Maximum = 0