iT邦幫忙

DAY 12
1

Excel VBA 的眉眉角角系列 第 12

Excel VBA 的眉眉角角Day12:修改狀態列顯示資料

當程式越寫越大,或者程式要執行時間較久時,總要透過的地方呈現目前程式狀態,而Excel常用的就是透過狀態列來顯示目前進度。以下程式為展示如何使用狀態列來顯示狀態文字。

Sub Day12()
    '設定狀態列的文字
    '將現在的狀態列文字複製到stb,狀態列是否顯示複製到dstb
    '狀態列於「就緒」狀態時,StatusBar屬性傳回 False
    stb = Application.StatusBar
    dstb = Application.DisplayStatusBar
    
    '變更狀態列顯示文字
    Application.StatusBar = "執行中...請稍後..."
    
    '主程式放在這裡
    
    '主程式執行完後
    '將兩個屬性帶回系統
    Application.DisplayStatusBar = dstb
    Application.StatusBar = stb
End Sub

由程式中我們可得知,最主要的方法是透過Application.StatusBar來呈現狀態列文字,我們可透過以上程式,將現有已撰寫的程式套上上述的頭尾程式,中間於每個執行階段夾雜Application.StatusBar方法來提醒程式執行進度,讓操作人員得知還需要等待多久時間,您的程式也會更趨於完美。


上一篇
Excel VBA 的眉眉角角Day11:變更表單按鈕的文字項目
下一篇
Excel VBA 的眉眉角角Day13: InputBox輸入密碼字串顯示*字串
系列文
Excel VBA 的眉眉角角30

尚未有邦友留言

立即登入留言