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.