如何在Excel中将当前的日期、月份或年份插入单元格？

Excel提供了内置函数和便捷的键盘快捷键，允许您快速插入当前日期、月份或年份。这些方法非常适合希望Excel显示自动更新的当前日期信息，或者需要在特定时刻手动输入时间戳的情况。

例如，要以数字形式显示当前月份，只需在目标单元格中输入以下公式： =MONTH(TODAY()) 然后按 Enter。这将返回当前月份（例如，8表示八月）。

参数说明：

• 公式 =TODAY() 和 =NOW() 会在工作表重新计算时自动更新，因此显示的日期/时间始终是最新的。
• =YEAR(TODAY()) 返回四位数的年份，而 =TEXT(TODAY(),"MMMM") 提供月份的全名。
• 如果您想要一个静态值（以后不会改变），请使用以下键盘快捷键。

对于静态输入——例如，当您想记录某个特定事件的日期，并且不希望该值在未来更新时——键盘快捷键尤其有用：

（1）要立即将当前日期插入选定单元格，请按 CTRL + ;。

（2）要在同一单元格中插入当前日期和时间，首先按 CTRL + ; 插入日期，松开按键，然后按空格键添加一个空格，最后按 CTRL + SHIFT + ; 添加当前时间。

实用提示和提醒：

• 使用 =TODAY() 或 =NOW() 的公式在文件重新计算时会持续更新，而键盘输入一旦输入则固定不变。
• 请注意工作表的计算模式。如果值没有自动更新，您可能需要按 F9 刷新。
• 如果您将公式复制到多行，请根据需要调整单元格引用。

这两种方法广泛适用于数据录入表、日常日志、自动化报告以及任何需要最新日期值的地方。纯公式方法最适合数据必须始终反映最新日期的情况；键盘方法则让您对静态记录进行控制。

如果您安装了Kutools for Excel，Insert Date工具可以轻松地以您偏好的日期格式快速插入当前年份、月份或日期。这种方法在需要一致的自定义格式或快速访问日历选择器以进行灵活选择时特别实用。

安装Kutools for Excel后，请参考以下步骤：

1. 选择要插入当前年份、月份或日期的单元格。然后转到 Kutools > 插入 > 插入日期。

2. 在“插入日期”对话框中，确保选择了“使用格式”选项。然后从右侧列表中双击所需的日期格式。所选格式将立即应用于活动单元格。请参见下面的截图：

现在，当前日期将以您指定的格式出现在所选单元格中。

注意事项和使用建议：

• 默认情况下，今天的日期已在“插入日期”对话框的日历中高亮显示。如果要插入其他日期，只需在双击首选格式之前点击日历上的所需日期即可。
• 这种方法可以让您灵活处理本地化的日期格式、专业的报告模板以及任何需要一致视觉呈现的场景。

对于需要在内容区域、页眉或页脚中标记实时信息的工作表场景，Kutools for Excel 提供了 Insert Workbook Information 工具。此功能特别适用于自动化文档控制、审计目的或分布式报告上的一致时间戳，因为它仅需几个步骤即可插入准确的日期和时间数据。

1. 单击工具栏中的 Kutools Plus > 工作簿 > 插入工作簿信息。

2. 在“插入工作簿信息”对话框中，选择“当前日期和时间”选项。在“插入位置”部分，指定您希望插入此信息的位置——选项包括任何工作表单元格以及页眉或页脚的任何区域。单击“确定”完成插入。请参阅上面的截图以获取视觉指导。

当前日期和时间现在已插入到您需要的位置。

额外提示：

• 这种方法在需要添加修订日期、数据导出的时间戳或打印物理记录时特别有用。
• 请记住，在页眉或页脚中插入的数据在页面布局或打印预览视图中最可见。
• 除非重新应用“插入工作簿信息”工具，否则在此处所做的更改不会自动更新。

为了实现更大的自动化——例如，当您希望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：通过自定义按钮插入当前日期、月份或年份，适合定制工作流或按需时间戳。

如何设置：

1. 单击 开发工具 > Visual Basic。
2. 在VBA编辑器窗口中，单击 插入 > 模块
3. 输入以下代码（示例显示将当前日期插入单元格A1；您可以根据需要修改目标单元格或逻辑）：

Sub InsertCurrentDate()
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Worksheets("Sheet1").Range("A1").Value = Date
End Sub

如何在Excel中将宏分配给按钮

1. 插入按钮:
   1. 转到功能区中的开发工具选项卡。
   2. 单击 插入 > 在表单控件下，选择 按钮（表单控件）。

      

2. 在工作表上的任意位置绘制按钮。
3. 分配宏:
   1. 绘制按钮后，“分配宏”窗口将弹出。
   2. 选择 InsertCurrentDate（或者您为宏命名的名称）。

      

4. 单击 确定。

每次单击它时，当前日期都将插入到Sheet1的单元格A1中。

您可以编辑宏以更改目标单元格、工作表，或者插入当前月份或年份。

故障排除和注意事项：

• 如果宏无法运行，请确保已在Excel设置中启用了宏。
• 在将VBA代码应用于重要文件之前，请先在样本工作簿上测试，以防止意外数据丢失。
• 将VBA与工作表控件结合使用可以实现强大而灵活的工作流自动化，但在集成新宏之前请务必保存备份。

总之，VBA解决方案为Excel中的自动时间戳提供了无与伦比的灵活性。当标准公式或工具无法完全满足您的工作流需求时，特别推荐使用它们。