分享成果，随喜真能量。大家好，今天繼續和大家分享VBA編程中常用的過程代碼,過程代碼在這裡講解的語句非常簡單單一，組合起來就是一個大的過程，不積跬步無以至千裡。

看闆：

下面是我根據我自己20多年的VBA實際利用經驗，編寫的幾部經驗教程，全是滿滿的"幹貨"，歡迎有需要的朋友聯絡（WeChat:NZ9668），分享。

1 《VBA代碼解決方案》是VBA中各個知識點的講解，覆蓋了絕大多數的知識點。

2 《VBA數據庫解決方案》是數據處理的利器；

3 《VBA數組與字典解決方案》中講解VBA的精華----字典。

4 面向初學及中級以下學員的視頻《VBA代碼解決方案》正在錄制。看視頻，"每天20分鐘，半年精進VBA"活動正在火熱進行中，越早報名，回饋越多。現在第一冊48講内容已經錄制完成，第一階段的優惠活動即将結束。

VBA過程代碼31：代碼過程在執行過程中将遇錯跳轉

Sub MyNZ()

on error goto err_handle

………….

………….

err_handle:

………….

………….

END SUB

代碼的解析說明：上述代碼過程在執行過程中，如果遇到錯誤會轉跳到标簽處往下執行。

VBA過程代碼32：代碼過程在執行過程中将删除一個文件

Sub MyNZ()

kill "c:/1.txt"

END SUB

代碼的解析說明：上述代碼過程在執行過程中，将删除一個文件。注意，kill命令删除文件是直接删除，而不是放到回收站中，所以要慎用此命令。

VBA過程代碼33：代碼過程在執行過程中将定制自己的狀态欄

Sub MyNZ()

Application.StatusBar = "現在時刻: " & Time

END SUB

代碼的解析說明：上述代碼過程在執行過程中，将定制自己的狀态欄，狀态欄上将顯示現在的時刻，如下：

VBA過程代碼34：代碼過程在執行過程中将恢複默認的狀态欄

Sub MyNZ()

Application.StatusBar = false

END SUB

代碼的解析說明：上述代碼過程在執行過程中，将定制的狀态欄，恢複狀态欄的默認狀态。

VBA過程代碼35：代碼過程在執行過程中将用代碼執行一個宏

Sub MyNZ()

Application.Run macro:=" MyNZ1"

END SUB

代碼的解析說明：上述代碼過程在執行過程中，将執行一個宏" MyNZ1"

更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!