设置 Excel 电子表格的“标题”属性

Question

首先，我是一个完全的 Excel 互操作小白。

我试图从单元格中获取日期，然后在保存文档之前将文档的标题设置为日期的月份。这是我的代码：

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   ThisWorkbook.Title = DateTime.Month(ThisWorkbook.Sheets("Sheet1").Cell("A10"))
End Sub

我不确定是否有任何工作。我在代码上设置了断点，但我无法“运行”它，因为它不是宏，而是事件处理程序，所以我认为断点不会起作用。我没有收到任何错误。我什至不知道那ThisWorkbook.Title是我想要的，我什至不确定从牢房里得到月份。

Answer 1

要更改 Excel 中的“标题”内置属性：

ActiveWorkbook.BuiltinDocumentProperties("Title") = "My Title Name"