我有一些我支持的用户要求自动发生事情(更自动化,但这是另一点!).
一个人希望事件每120秒发生一次(参见我的另一个问题),另一个人希望在每个工作日的下午5点发生一件事.这必须在Excel工作表上,因此VBA作为插件等将是不,因为它需要自包含.
我非常不喜欢使用Application.OnTime 我认为它危险且不可靠,其他人怎么想?
编辑:交叉发布是VBA宏定时器样式,每隔设定的秒数运行代码,即120秒
我想在Excel 2007的单元格A1中显示一个时钟.我熟悉NOW()和TODAY(),但它不像我想要的那样每1分钟刷新一次.你知道,就像一个正在运行的时钟.我只想将h:mm中的当前时间放在单元格A1中.这可能吗?
从这个时钟我将做进一步的计算,比如自从我上次做了活动X,Y和Z以来已经有多长时间了.谢谢你.
我在Excel vba中有一些宏,并且我在Excel工作表上执行一些功能,大约需要30秒才能完成.所以我希望在这段时间内显示带有进度条的用户表单.
我尝试userform.show在函数的最开始使用,userform.hide最后但我发现在后台无法执行任何操作.
因此,只想知道是否有任何转向,以便在显示表单时在后台完成处理.
非常感谢 :)
Private Sub CommandButton1_Click()
'--------------Initialize the global variables----------------
UserForm1.Show
nameOfSheet2 = "Resource Level view"
nameOfSheet3 = "Billable Hours"
nameOfSheet4 = "Utilization"
'-------------------------------------------------------------
Dim lastRow, projectTime, nonProjectTime, leaveAndOther
Dim loopCounter, resourceCounter
lastRow = 0
projectTime = 0
nonProjectTime = 0
leaveAndOther = 0
resourceCounter = 2
Set workbook1 = Workbooks.Open(File1.Value)
Sheet3Creation
Sheet2Creation
Sheet4Creation
UserForm1.Hide
End Sub
Run Code Online (Sandbox Code Playgroud)