为了实现更高程度的自动化——例如，当您希望 Excel 每次修改特定单元格时记录确切的输入日期，或者希望通过点击按钮来触发日期标记——可以使用 VBA（Visual Basic for Applications）。这种方法非常适合用于日志表、审计跟踪或需要精确控制的自定义报告。VBA 可根据您的特定工作流需求动态插入当前日期、月份或年份。
场景1：每当编辑指定列或范围内的单元格时，自动插入当前日期。此解决方案非常适合创建“最后修改”列或自动为条目添加时间戳。
如何设置：
右键单击您希望自动化的表格标签，并选择 查看代码。 在打开的 Microsoft Visual Basic for Applications 窗口中，将以下代码粘贴到代码窗格中： Private Sub Worksheet_Change(ByVal Target As Range)
'Automatically insert current date when any change occurs in column B (adjust to your needs)
On Error Resume Next
xTitleId = "KutoolsforExcel"
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Target.Offset(0, 1).Value = Date 'Inserts date in column C when column B changes
End If
End Sub操作提示：
任何时候您编辑 B 列中的单元格，当前日期都会自动出现在 C 列的相邻单元格中（您可以根据需要调整目标范围和偏移量）。 若要将此逻辑应用于不同的范围或将月份/年份插入，相应地将 Date 修改为 Month(Date) 或 Year(Date)。 此方法最适合审计日志或“最后更新”日期跟踪。确保启用了宏，以便此代码能够正常运行。 场景2：通过点击自定义按钮插入当前日期、月份或年份，适合自定义工作流程或按需时间戳。
如何设置：
点击 开发工具 > Visual Basic。 在 VBA 编辑器窗口中，点击 插入 > 模块。 输入以下代码（示例显示将当前日期插入到 A1 单元格中；您可以根据需要修改目标单元格或逻辑）： Sub InsertCurrentDate()
On Error Resume Next
xTitleId = "KutoolsforExcel"
Worksheets("Sheet1").Range("A1").Value = Date
End Sub 如何将宏分配给 Excel 中的按钮
插入按钮: 转到功能区上的 开发工具 选项卡。 点击 插入 > 在表单控件下，选择 按钮（表单控件）。 在工作表的任意位置绘制按钮。 分配宏: 绘制按钮后，将弹出 分配宏 窗口。 选择 InsertCurrentDate（或您为宏命名的名称）。 点击 确定。 每次点击按钮时，当前日期都会插入到 Sheet1 的 A1 单元格中。
您可以编辑宏以更改目标单元格、工作表，或插入当前月份或年份。
故障排除与注意事项：
如果宏无法运行，请确保已在 Excel 设置中启用了宏。 在将 VBA 代码应用于重要文件之前，先在样本工作簿上测试 VBA 代码，以防止意外数据丢失。 将 VBA 与工作表控件结合使用可以实现强大而灵活的工作流自动化，但在集成新宏之前务必保存备份。 总之，VBA 解决方案为 Excel 中的自动时间戳提供了无与伦比的灵活性。当标准公式或工具无法完全满足您的工作流需求时，特别推荐使用它们。