vba设置的时间为什么会2秒跳
发布时间: 2024-08-06 23:38:08
❶ 如何在excel中设置时间,并且自动显示每分每秒的变化
用设置方法是办不到。不过可使用VBA宏代码来实现。
实现操作:打开Excel表格后, 按“Alt+F11",打开VBA编辑器,双击最下面的“ThisWoikbook",将下面的VBA代码粘贴到右边“通用”下面的框中,然后,选择代码编辑采单栏的“运行——运行子过程/用户窗体”。这时,可在任意表格的A1单元格中显示时间:小时:分:秒。
Public Sub MyMacro()
dTime = Now + TimeValue("00:00:01")
Application.OnTime dTime, "ThisWorkbook.MyMacro", , True
With Range("A1")
.Value = Now
.NumberFormat = "hh:mm:ss"
End With
End Sub
Private Sub Workbook_Open()
MyMacro
End Sub
热点内容