excel表格中如何实现自动填充当前时间

例如:我懒得用组合快捷键,如果有入库的只要我前面B2输入完后,自动录入当前系统时间,
这种该怎么处理

菜单栏,工具,选项,重新计算,勾选迭代计算,最多迭代次数设为1次,然后在E2输入

=IF(B2="","",IF(e2="",TEXT(IF(e2>0,NOW(),""),"h:m"),e2))并向下填充,这样,你只要在b2输入内容,B1就会永远定格显示为你在A1输入内容时的时间,无论你关闭后再打开,或进行其他操作,该时间都不会变化 ,记住B列先不要输入任何内容,公式写完后再输入

追问

如果我要显示日期呢,表达式改怎么写 h:m要换成什么

追答

=IF(B2="","",IF(e2="",TEXT(IF(e2>0,NOW(),""),"yyyy-m-d h:m"),e2))

追问

额,你理解错了,我说如果我只要日期,表达式改怎么写。 注:只要日期额

追答

=IF(B2="","",IF(e2="",TEXT(IF(e2>0,NOW(),""),"yyyy-m-d"),e2))

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-12-17

我只定义到1000行

按【ALT+F11】,双击左侧你的工作表,将如下代码粘贴到右侧编辑区,返回工作表即可实现

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row >= 2 And Target.Row <= 1000 And _
    Target.Column >= 2 And Target.Column <= 5 Then
    Application.EnableEvents = False
    Cells(Target.Row, 6) = Now()
    Application.EnableEvents = True
    End If
    End Sub


追问

你好,我能再追问你一些其他问题吗,你的这个BVA宏很好

第2个回答  2013-12-17
E1=IF(B1="","",IF(E1="",NOW(),E1))下拉填充柄填充
EXCEL选项-公式-启用迭代计算-最多迭代次数选1-确定
必须在E列有公式前提下在B列输入数据
第3个回答  2013-12-17
首先把E列设置你想要的时间格式;
接下来在E2列中输入=IF(B2="","",NOW()),然后下拉即可达到效果。
第4个回答  2018-12-12
输入法设自定义短语,不具有易失性,你用公式给定的时间,一排序就没有了,推荐自定义短语输入,这样随便你怎样排序,时间不会变化
相似回答