1、首先我们打开一个工作样表作为例子。
2、使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:Option ExplicitSub 显姨胀兽辱示固定日期格式()Dim zdrqzdrq = DateSerial(2016, 8, 20)MsgBox zdrqSheet2.ActivateSheet2.Range("a1") = zdrqEnd Sub
3、我们对zdrq变量进行声明,默认为variant,这是vba中对变量类型的自定义,类型的字节数为最大型,也就是说任何变量声明都可以这样写,在代码优化的时候再进行准确声明。
4、这里就是datese筠续师诈rial函数的使用方法了。dateserial有三个参数,分别是year,month还有day,也就是按参数顺序输入的数值,会以date的格式进行输出。
5、然后我们使用msgbox函数来显示dateserial函数的返回值,这里也可以锂淅铄旰直接不使用变量直接写函数返回值的代码,当然作为示例或一次性输出可以这样写,但是不符合代码习惯。
6、比如后面我们要将msgbox信息写入表格内,而我们又没有给dateserial设置变量的话,那么我们必须重新输入依次完成的函数,否则就得不到正确的结果。