如何在excel表单上显示vba宏的状态？

我有一个优秀的VBA宏，它不断更新数据库。如何在excel表单上显示vba宏的状态？

我使用ActiveX控件，在Excel表单上的“开始”按钮触发宏。

我想在表格的单元格中的一个显示状态为“工作”，而它是正确

工作在某些错误，应该显示的情况下，“停止工作”。

我该怎么做？

2011-04-07 Parth Bhatt

在按钮的OnClick方法将这个：

Public Sub CommandButton1_Click() 
    On Error GoTo ErrorHandler 

    Dim msgRange As Range 
    ' change this to the cell you want to update 
    Set msgRange = ThisWorkbook.Sheets("Sheet1").Range("A1") 
    msgRange.Value = "Working" 

    ' your code goes here 

    msgRange.Value = "Completed" 
    Set msgRange = Nothing 
    Exit Sub 
    ErrorHandler: 
     msgRange.Value = "Stopped working: " & Err.Description 
     Set msgRange = Nothing 
End Sub

来源

2011-04-07 11:28:29 KyleNZ

使用'Application.StatusBar'，而不是一些随机的细胞！否则，这是一个好方法。 – 2011-04-08 07:56:59

我从来都不是'Application.StatusBar'的忠实粉丝，因为我的用户永远不会期望在屏幕底部看到任何有意义的东西......我发现将状态消息放在按钮旁边更明显，我只是点了点头。但是对于他们自己！ – KyleNZ 2011-04-08 13:42:25

，或者您可以使用Application.StatusBar这是显示更新的常用方法： Application.StatusBar = "Updating..."

来源

2011-04-07 12:29:40

如何在excel表单上显示vba宏的状态？

回答

相关问题