Dazu über Datei öffnen die Normal.dot öffnen und das nachfolgende AutoOpen-Makro als Modul (nicht unter Extra-Makro-Makros, sondern in der VBA-Umgebung = Alt+F11) eingeben:
Sub AutoOpen()
On Error Resume Next
With ActiveDocument
.ActiveWindow.Caption = .FullName
End With
End Sub