如何在 Excel 中自动为注释添加日期和时间?

ms excelmicrosoft technologiescomputers更新于 2024/9/19 19:56:17

当我们在 Excel 中为单元格添加注释时，您可能注意到注释中只包含用户名，但我们也可以自定义注释，将日期和时间添加到电子表格中。我们可以使用下面提到的步骤在 Excel 中自动为注释添加日期和时间。

阅读本教程，了解如何通过简单的步骤在 Excel 中自动为注释添加日期和时间。

在 Excel 中自动为注释添加日期和时间

在这里，我们将首先插入注释，然后插入 VBA 模块来完成我们的任务。让我们来看看在 Excel 中为注释添加日期和时间的简单步骤。我们将借助 VBA 应用程序来完成我们的要求，因为没有 VBA 代码就无法完成。

步骤 1

假设我们新建一个 Excel 工作表，然后输入数据并通过右键单击"注释"按钮插入注释并输入注释。我们的注释将与下图所示的注释类似。

要添加日期和时间，请点击单元格，然后右键单击工作表名称并选择"查看代码"以打开 VB 应用程序，然后点击"插入"并选择"模块"，最后在文本框中输入程序，如下图所示。

程序

Sub DatedComment()
   'Update Nirmal
   Dim pComment As Comment
   Dim WorkRng As Range
   Set WorkRng = Application.ActiveCell
   Set pComment = WorkRng.AddComment(Application.UserName & ":" & vbLf & Now & vbLf)
   pComment.Shape.TextFrame.Characters(1, VBA.Len(Application.UserName) + 1).Font.Bold = True
End Sub