嗨,在那里,我创建了一个电子表格,用来计时进出工作,并且已经设置了一个简单的wee。此外,我有当前的时间显示,只要我启动工作表,但它显示在每一页,我想知道如何停止?下面的示例代码:全局clockOn作为布尔值
Sub runClock()
Range("M15").Value = Now()
If clockOn = True Then
Application.OnTime Now + TimeValue("00:00:01"), "runClock"
End If
End Sub
Sub Auto_Open()
clockOn = True
runClock
End Sub
Sub stopClock()
clockOn = False
End Sub
最重要的是,我将做一个宏,将信息放到一个特定的页面上,因为这将取决于从下拉菜单中选择的日期,对此的任何帮助都将非常有用:)就像VBA代码中的if语句一样,选择正确的页面并将数据留在那里。
发布于 2015-07-09 17:26:53
您需要指定要将值放在上面的工作表;目前您只指定范围,但没有指定工作表。可以通过多种方式执行,例如:
Sheets(1).Range("M15").Value = Now()
这将选择工作簿中的第一个工作表。如果您有多个工作簿,则还需要以某种方式指定它(通过引用活动工作簿或工作簿的名称等)。例如:
Activeworkbook.sheets(1).Range("M15").Value = Now()
https://stackoverflow.com/questions/31324184
复制相似问题