Question

EXCEL怎么用函数自动输入当天日期？

EXCEL怎么用函数自动输入今天日期？而且要明天打开的时候，日期不变，还是昨天的日期。。
我说具体点吧。
假设我A1是“时间”，A2是“商品名称”
我现在要的是我B2输入商品名称假如是“水”，输完B2，A2自动跳出今天日期。而且是以后打开表格，B2还是显示这个日期。不变的日期。

就跟“手工输入”和“Ctrl+；”的效果一样，不是=today() 的不断变化
如：A2=IF(B2="","", “什么办法？")
求“什么办法”的答案。

或者不用函数的话、用宏怎么编辑？

Answer 1

如果你仅仅是想实现这个功能，用函数=TEXT(NOW(),"yyyy/mm/dd"。

如果你想要实现每次更新的时候在对应行的指定位置自动填入日期的话，只能用VBA，可以在一个单元格中同时输入日期和时间，先输入日期或先输入时间均可，只是记住中间须用空格隔开，如2001/3/1 7:45:00。

按下“Ctrl+;”组合键，输入系统日期 ，按下“Ctrl+Shift+;”组合键，输入系统时间。

可以在一个单元格中同时输入日期和时间，先输入日期或先输入时间均可，只是记住中间须用空格隔开，如2001/3/1 7:45:00。

表格数组的首列查找指定的值，并由此返回表格数组当前行中其他列的值。

VLOOKUP 中的 V 参数表示垂直方向。当比较值位于需要查找的数据左边的一列时，可以使用 VLOOKUP 而不是 HLOOKUP。

拓展资料：

Lookup_value  为需要在表格数组 ，数组：用于建立可生成多个结果或可对在行和列中排列的一组参数进行运算的单个公式。数组区域共用一个公式；数组常量是用作参数的一组常量，第一列中查找的数值。Lookup_value 可以为数值或引用。若 lookup_value 小于 table_array 第一列中的最小值，VLOOKUP 返回错误值 #N/A。

Table_array  为两列或多列数据。使用对区域或区域名称的引用。table_array 第一列中的值是由 lookup_value 搜索的值。这些值可以是文本、数字或逻辑值，文本不区分大小写。

Answer 2

点击菜单栏中的工具
然后点击宏再点录制新宏然后会出现一个对话框
点击确定会出现两个小小的图标点击第一个停止录制
然后按Alt+F11就出现了VBA界面左边有一个工程界面里面有模块
点击前面的加号一个会出一个模块1
再点击一下模块1会出现以下代码
Sub Macro1()
'
' Macro1 Macro
' 宏由 USER 录制，时间: 2013-4-8
'

'End Sub
然后把它们全删除了
把下面三行复制进去
Function tttt()
tttt = Date
End Function
然后在表格中比如要在输入名字后让电脑自动输入日期可以用以下
=IF(LEN(A1)=0,"",tttt())
比如A1是要输入姓名列,当你输入的过名字后就触发A1的长度不等于0
电脑就调用tttt()这个方法就会把日期输入到表格中
不过要注意的是当A1被改过后也会调用tttt()
就是说也会更改日期
还有就是单元格格式也要记得改为日期格式
否则会出现的是数字.
Function tttt()
tttt = Date
End Function
上面这个是显示日期当需要显示日期和时间时只要把它改为
Function tttt()
tttt = Now
End Function
就可以了,不过也要记得改单元格格式不然会出现数字

Answer 3

有时候，人们需要在EXCEL表中输入当前日期，最简单的方法是把日期简单地输入到EXCEL表格中，但是如果以后打开的时候需要当前日期，还需要再输入一次日期。这样稍显麻烦。

我们可以利用EXCEL2003自带的函数来在表格中填写当前日期。这个函数就是today()。Today函数的用法非常简单，只要在EXCEL表格中输入“=today()”即可。这个函数可以返回当前日期并显示在单元格中，而且，这个函数会根据系统时间自动更新。也就是说，如果5月30日编辑的EXCEL表格中使用了这个函数，那么，在6月1日再打开这个表格的话，日期会自动更改为6月1日。

追问

我要的是今天输完，明天打开后天打开，还是今天的日期，我要的是不变，而不是变。

Answer 4

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 2 And Cells(Target.Row, 1) = "" Then
        Cells(Target.Row, 1) = Date
    End If
End Sub

Answer 5

在某个空的单元格输入：=today（），确定，得出日期后，复制，粘贴（粘贴时选择：只保留值和格式）到你想放置的单元格上就行了。

追问

这位大哥真幽默。比手工输入还慢的方法就不要拿出来了。3Q