首页 Excel教程内容详情

如何在Excel中输入数据时自动加入一个时间戳

2025-09-18 4 office教程网
如何在Excel中输入数据时自动加入一个时间戳

站点名称:如何在Excel中输入数据时自动加入一个时间戳

所属分类:Excel教程

相关标签: # 如 # 何在 # Excel # 中 # 输入 # 数据 # 时 # 自动 # 加入 # 一个

官方网址:

SEO查询: 爱站网 站长工具

进入网站

站点介绍

当我们在Excel中输入或更新数据时,有时需要自动添加一个时间戳,表示当前数据的最新更新时间。如下图所示,当在C列更新数据时,在D列自动加入更新时的时间。

   

    可以用VBA代码来实现,实现步骤如下:

    按Alt+F11,打开VBA编辑器。在“工程”窗口中双击“ThisWorkBook”,在右侧的代码窗口中粘贴下列代码:

Excel默认调色板颜色索引对照表

在Excel2003中,当我们设置单元格底纹、字体颜色时,在工具栏中Excel默认调色板提供了40中颜色供直接使用,而在对话框中,Excel默认调色板提供了56中颜色可供直接使用。有时我们需要用VBA代

    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
      If ActiveSheet.Name <> "Sheet1" Then Exit Sub
      If Target.Column = 3 Then Target.Offset(0, 1) = Now
    End Sub

    这样,当“Sheet1”表C列单元格中的内容发生改变时,Excel会自动在D列同一行中的单元格中添加时间。

    如果要将目标区域指定为C2:C20,可以用下面的代码:

    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
      If ActiveSheet.Name <> "Sheet1" Then Exit Sub
      With Target
        If .Column = 3 And .Row > 1 And .Row < 21 Then .Offset(0, 1) = Now
      End With
    End Sub

    需要注意的是,当目标区域中的任意单元格内容发生改变,包括删除或更新数据时,都将触发Worksheet.SelectionChange 事件。

Excel如何设置标签颜色

Excel如何设置标签颜色操作步骤当一个Excel工作簿中有多个工作表时,为了提高观感效果,同时也为了方便对工作表的快速浏览,我们将工作表标签(Sheet1、Sheet2)设置成不同的颜色。右击

浏览统计(最近30天)