vba 和Excel 根据日期自动生成日期

如何利用excel的vba，自动插入时间？

• 打开EXCEL，按ALT+F11，进入VB编辑，右击插入模块

  

  请点击输入图片描述

• 在模块中输入如图语句

  

  请点击输入图片描述

• 再点击工作表输入如图语句

  

  请点击输入图片描述

• 关闭编辑页面，进入EXCEL页面，点击视图－宏，选中biao,单击执行

  

  请点击输入图片描述

• 单击工作表中，任意单元格，就出来了，开始自动跳。

  

  请点击输入图片描述

注意事项

如需指定单元格，可把模块语句中的a1改成指定单元格

excel 用VBA设置A列自动显示当天的日期！

如果需要对多个单元格自动显示当天日期，那么选择单元格区域，输入以下公式，然后按Ctrl+Enter组合键结束

=TODAY()

快速生成当天日期，且该日期随着系统时间的变化而变化。

详见附图

excel VBA 自动记录日期

加入一个针对A列数值的判断即可。。如果A列有数值，那么就不写入，如果为空，写入即可。。

PrivateSubWorksheet_Change(ByValTargetAsRange)
WithTarget
If.Columns.Count=1Then
If.Column=10And.Row>1Then
ForEachcInTarget
'增加对A列的判断
IfLen(c.Offset(0,-9).Value)=0Then
c.Offset(0,-9).Value=Format(Now,"yyyy-mm-ddhh:mm:ss")
EndIf
Next
EndIf
EndIf
EndWith
EndSub

如何用VBA来控制excel中的自动当前日期

Private Sub Workbook_Open() If [a1] = "" Then [a1] = Date Else Exit Sub End If End Sub 在工作表标签，右键，查看代码。 双击Thisworkbook，得到一个代码窗口 将这段代码粘贴到Thisworkbook的代码窗口内即可 a1是一个单元格地址 要改变日期的存放地址，请将a1更改为其它单元格地址即可

EXCEL用函数自动生成日期和时间？

1、首先我们需要在excel表上插入一个空白行。

2、完成第一步之后，再输入函数=now（）。

3、完成上一步之后，按回车键后出现当前时间。

4、这时候打印预览中已经能打印出当前时间了。

5、然后保存关闭excel表格后，接着选择重新打开。

6、生成日期则是=TODAY()，按回车键得到结果。