limalove

摘要： DoEvents非常有用，当前程序运行时，可以把控制权交给其他程序，动画演示图标时会用到这句代码，DoEvents转让控制权，在运行一个程序时，可以运行另外一个程序。 例子，视频中是通过公共变量k来中止这个程序，但是没有测试成功。 '在单元格查看就像一个表，显示当前时间 Sub 时间显示() Dim 阅读全文

摘要： 计算时间差 '计算时间差 Sub test2() Dim t, x, s t = Timer Debug.Print t For x = 1 To 900000 s = s + x Next x Debug.Print Timer - t End Sub DateDiff函数 ' datediff( 阅读全文

摘要： 1，返回当前日期，时间 ' 1, 返回当前日期，时间 Debug.Print "当前日期：" & Date Debug.Print "当前时间：" & Time Debug.Print "当前日期和时间：" & Now 2，格式化显示日期 ' 2格式化显示日期 Debug.Print vbNewLi 阅读全文

摘要： 注意：使用VBA.TypeName() 判断单元格内容的数据类型时，单元格一定要使用value属性。（切记切记，否则返回的类型是Range） 判断是否为空 VBA.IsEmpty() VBA.TypeName() 判断是否为数字类型 VBA.Isnumeric() Application.Works 阅读全文