Document.FullName (Word)

Devuelve una cadena que representa el nombre de un documento, incluida la ruta de acceso.

Uso de esta propiedad es equivalente a usar las propiedades Path, PathSeparator y Name en secuencia.

Sub DocName() 
 MsgBox ActiveDocument.FullName 
End Sub