
当我们在运行一个执行时间稍长的VBA代码时,可以用下面的VBA代码在状态栏中显示一些信息来提示用户:
Application.StatusBar = "提示信息"
代码运行完毕,再恢复默认状态栏:
在excel用VBA更改批注的作者
在Excel中,当光标移动到包含批注的单元格中时,通常会在状态栏和批注中显示批注者的名称。如果需要将批注者改为其他人,可以用下面的VBA代码。以后再插入新的批注,也将使用新输入的名称。使用前先将代码中的“新作者”和“原作者”按照需要进行替换。 Sub ChangeComm
Application.StatusBar = FALSE
例如下面的代码在状态栏中显示“正在运行,请稍后……”的提示信息,显示时间为5秒钟。
Sub DisplayMessageOnStatusbar()
‘开始执行代码
Application.DisplayStatusBar = True ‘显示状态栏
Application.StatusBar = "正在运行,请稍后……" ‘状态栏显示信息
‘5秒钟后恢复默认状态栏
Application.Wait Now TimeValue("00:00:05")
Application.StatusBar = False
End Sub
excel利用VBA在标题栏中显示工作簿的路径
通常,当我们打开一个Excel工作簿时,标题栏中仅仅显示一个简单的文件名。我们可以用下面的VBA代码,让工作簿在打开时在标题栏显示其路径和文件名: 按Alt F11,打开VBA编辑器,在“工程”窗口中双击“ThisWorkBook”,在右边的代码窗口中输入以下代码: Pr