您的位置: 首页 > EXCEL技巧 > Excel基础 >

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

时间:2013-12-10 整理:docExcel.net

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

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

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

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 事件。

逆天强人在Minecraft中造“Word软件” 问题:逆天强人在Minecraft中造“Word软件”
回答:...谓的“文字处理软件”,相当具有古典气息。只要输入指令,那块大大的“液晶屏”上就会显示出字符。无论大写、小写、数字还是符号都难不倒它。 最强悍的是,Koala_Steamed 透露说整个过程中他没有使用到命...
怎么在表格里一整列加入同样的26# 该怎么做 问题:怎么在表格里一整列加入同样的26# 该怎么做
回答:假如你的原始数据是在A列,你在B列输入=“6#-”&A1,然后下拉该公式。其中,双引号必须是在英文状态下输入的双引号,&是由shift加数字4打出来的。
传iPhone6S外观和6保持一致 加入动态按压技术 问题:传iPhone6S外观和6保持一致 加入动态按压技术
回答:...其他产品的全新功能,例如苹果手表上的“动态按压输入”(dynamic Force Touch,该技术可以识别触控的力度以完成不同的指令)功能,但传闻中的多摄像头系统则不会出现。 据熟悉苹果下一代产品开发进程的消息人士透露...
Word2007中如何在页眉加入图片 问题:Word2007中如何在页眉加入图片
回答:...计”选项卡,使页眉处于编辑状态,然后可以页眉处输入需要的文字。如图: 3.选择“插入”选项卡,在“插图”选项组中选择“图片”命令。 4.在弹出的“插入图片”对话框中,选择要插入的图...
情理之中意料之内,无秘推匿名群聊功能 问题:情理之中意料之内,无秘推匿名群聊功能
回答:...每个用户暂时只能发起 3 个群聊。发起群聊需要三步走:输入主题,描述发言要求,并为群聊设置图标。开群都要设图标,大家为八卦也是醉了。 制作出来的群可以通过微信、QQ 好友和空间分享邀请链接。 群做出来之后就是...
Word2003入门动画教程39:Word中更新微软拼音输入法 问题:Word2003入门动画教程39:Word中更新微软拼音输入法
回答:...Word中,我们可以把某些专业术语或生僻词加入微软拼音输入法2003的自造词词典中,再输入时,它们会出现在候选窗口的最前列,免去了翻页选字之苦,输入速度自然就大大提高了,具体操作就让Excel办公网为大家带来分享! 动...
相关推荐: