下面介绍如何在excel中用vba制作一个数字钟。不会的请参考这篇文章学习!
步骤
1.首先我们打开一个工作样表作为例子。
2.使用alt f11进入vbe编辑器,插入一个新模块,并在模块编辑框中输入以下代码:
选项显式
Sub MyMacro()
Dim dTime作为变量
dTime=现在时间值(' 00:00:01 ')
申请。准时,第三页。MyMacro 'True
带范围(' A1 ')。价值=现在。NumberFormat='hh:mm:ss '
以…结尾
末端接头
3.这里我们将变量声明为未指定类型变量,然后将变量dTime赋为当前时间返回值,并设置1秒延迟的定义。
4.然后我们用ontime函数做一个计时过程,在dtime变量定义的时间执行宏过程MyMacro。
5.这里用with函数来缩写RANGE的代码(' a1 '),非常简单。with之后的属性代码是对象范围的属性(' a1 ')。
6.将其值赋给now的当前时间,并以日期格式输出。如果没有添加固定格式输出,则输出值将设置为当前工作表单元格的格式。
以上是用excel vba制作数字钟的方法介绍。操作很简单。按照上面的步骤就可以了。希望能帮到你!