☰

如何将当前月份和年份添加到 Excel 工作簿的标题？

tag-icon • tag-icon microsoft-excel microsoft-excel-2016 headers
如何将当前月份和年份添加到 Excel 工作簿的标题？

我需要在标题中输入当前年份，并将工作表名称添加为日期（例如，2/[Tab]/[YYYY]）。这可能吗？我知道插入日期选项将动态日期放入标题，但如果可能的话，我需要能够手动控制月份。

任何建议将不胜感激。

答案1

可以使用 VBA 来完成。

首先在中输入以下公式CELL A1，可以将其更改为您想要的任何单元格，只需确保更改宏部分中的参考点。

=DAY(TODAY())&"/"&MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)&"/"&YEAR(TODAY())

它将创建您的动态日期和工作表名称组合。

然后将以下内容放入模块中：

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = Range("A1").Value
End Sub

它将获取日期组合并在打印之前将其设置到您的标题中。

它也应该在您查看打印预览之前生效。

相关内容