Partilhar via


Propriedade Project.FullName (Project)

Obtém o caminho e o nome de arquivo de um projeto. String somente leitura.

Sintaxe

expressão. Fullname

Expressão Uma variável que representa um objeto Project .

Comentários

A propriedade FullName retorna o nome do projeto (como visto na barra de título) de um projeto não salvo.

Exemplo

O exemplo a seguir solicita ao usuário o nome completo de um arquivo e, em seguida, fecha o arquivo, salvando-o caso ele tenha sido alterado.

Sub CloseFile() 
 Dim P As Project ' Project object used in For Each loop 
 Dim FileName As String ' Full name of a file 
 
 ' Prompt user for the full name of a file. 
 FileName = InputBox$("Close which file? Include its path: ") 
 
 ' Search the open projects for the file. 
 For Each P In Application.Projects 
 
 ' If the file is found, close it. 
 If P.FullName = FileName Then 
 P.Activate 
 FileClose pjSave 
 Exit Sub 
 End If 
 Next P 
 
 ' Inform user if the file is not found. 
 MsgBox ("Could not find the file " & FileName & ".") 
 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.