通常，当我们打开一个Excel工作簿时，标题栏中仅仅显示一个简单的文件名。我们可以用下面的VBA代码，让工作簿在打开时在标题栏显示其路径和文件名：
按Alt+F11，打开VBA编辑器，在“工程”窗口中双击“ThisWorkBook”，在右边的代码窗口中输入以下代码：
Private Sub Workbook_Open()
ActiveWindow.Caption = ActiveWorkbook.FullName
End Sub
需要注意的是，上述代码只是在工作簿打开时运行，如果将工作簿另存为其他名称，在上述代码未运行的前提下，标题栏中的路径不会改变。