Classe RecentFile - arquivo usado recentemente (Word VBA)

A classe RecentFile representa um arquivo usado recentemente. O objeto RecentFile é membro da coleção RecentFiles. Para usar uma variável de classe RecentFile, ela primeiro precisa ser instanciada por exemplo

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

For Each

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

Dim rcnfl As RecentFile
For Each rcnfl In RecentFiles
	
Next rcnfl

Delete

Exclui o arquivo especificado na lista de arquivos recentes.

RecentFiles(1).Delete

Index

Retorna um Long que representa a posição de um item em uma coleção. Somente leitura.

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

Name

Retorna o nome do objeto especificado. Cadeia de caracteressomente leitura.

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

Open

Abre o objeto especificado. Retorna um objeto Document que representa o documento aberto.

Sub OpenRecentFiles() 
 Dim rFile As RecentFile 
 For Each rFile In RecentFiles 
 rFile.Open 
 Next rFile 
End Sub

Path

Retorna o disco ou o caminho da Web para o objeto especificado. Cadeia de caracteressomente leitura.

O caminho não inclui um caractere precedente — por exemplo, "C:\MSOffice" ou "https://MyServer". Use a propriedade PathSeparator para adicionar o caractere que separa pastas e letras de unidade. Use a propriedade Name para retornar o nome de arquivo sem o caminho.

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

ReadOnly

True se as alterações no documento não podem ser salvos no documento original. Boolean de leitura/gravação.

With RecentFiles(1) 
 .ReadOnly = True 
 .Open 
End With