1、首先我们打开一个工作样表作为例子。
2、使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Option Explicit
Sub 区别()
Dim dtime As Variant
Dim ddate As Variant
dtime = Now
ddate = Date
Range("a1") = dtime
Range("a2") = ddate
End Sub
3、首先我们做变量声明，实际上now函数和data函数所返回的值都是data类型，所以我们更应该写成
Dim dtime As date
Dim ddata As date
4、然后我们给两个变量分别赋值，这里需要注意的是，date函数和now函数后面可以有小括号，也可以省略小括号的。
5、我们在a1和a2单元格中分别输入data函数和now函数的返回值，可以发现date函数返回的是日期，而now函数返回的是日期和时间。
6、这里需要对单元格格式进行设置，我们给代码加上这样的语句，可以更直观的看到两个函数的返回结果的不同。
Range("a1").NumberFormat = "hh:mm:ss"
Range("a2").NumberFormat = "hh:mm:ss"
