excel实现双击空白单元格后自动输入日期/时间
来源:网络收集 点击: 时间:2024-04-22我们有这样一个表格,B列为日期,每次编辑时,如果B列的单元格为空,则自动输入当前日期。对于这个问题你有没有什么好办法呢?

点击开发工具——visual Basic,打开代码编辑器。

双击sheet1.通用模块是写过程宏和自定义函数的地方,Sheet和thisworkbook是写事件的地方。如果你想将这个功能在每个工作表中都实现,则应该点击thisWorkBook。

在打开的代码编辑页面输入这些代码。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
双击自动输入日期
If ActiveCell.Value = And (ActiveCell.Column = 2 Or ActiveCell.Column = 10) Then
ActiveCell.NumberFormatLocal = yyyy-m-d
ActiveCell = Date
End If
双击自动输入时间
If ActiveCell.Value = And (ActiveCell.Column = 11) Then
ActiveCell.NumberFormatLocal = hh:m:s
ActiveCell = Time
End If
End Sub

进入excel页面,双击B6,效果就出来啦,自动输入当前日期。

双击K6,自动输入当前时间。效率简直不要太高。

如果觉得这篇经验帮到了你,请投票、点赞鼓励我哦!谢谢啦!
如果有任何疑问,send me a message,please!
EXCEL自动输入日期时间版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_571150.html