2
我有一個優秀的VBA宏,它不斷更新數據庫。如何在excel表單上顯示vba宏的狀態?
我使用ActiveX控件,在Excel表單上的「開始」按鈕觸發宏。
我想在表格的單元格中的一個顯示狀態爲「工作」,而它是正確
工作在某些錯誤,應該顯示的情況下,「停止工作」。
我該怎麼做?
我有一個優秀的VBA宏,它不斷更新數據庫。如何在excel表單上顯示vba宏的狀態?
我使用ActiveX控件,在Excel表單上的「開始」按鈕觸發宏。
我想在表格的單元格中的一個顯示狀態爲「工作」,而它是正確
工作在某些錯誤,應該顯示的情況下,「停止工作」。
我該怎麼做?
在按鈕的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
,或者您可以使用Application.StatusBar這是顯示更新的常用方法: Application.StatusBar = "Updating..."
使用'Application.StatusBar',而不是一些隨機的細胞!否則,這是一個好方法。 – 2011-04-08 07:56:59
我從來都不是'Application.StatusBar'的忠實粉絲,因爲我的用戶永遠不會期望在屏幕底部看到任何有意義的東西......我發現將狀態消息放在按鈕旁邊更明顯,我只是點了點頭。但是對於他們自己! – KyleNZ 2011-04-08 13:42:25