藍字關注，加微信NZ9668獲資料信息

?VBA解決方案 ? 系列叢書作者?

頭條百家平臺 VBA資深創作者

_______________________________

分享成果，隨喜真能量。大家好，今天繼續和大家分享VBA編程中常用的過程代碼,有興趣的朋友可以反饋交流一下：VBA中，常用的過程又哪幾類.VBA過程代碼26：返回選定區域的非空單元格的個數Sub MyNZ()H = Application.WorksheetFunction.CountA(Selection)MsgBox "非空單元格數" & H & "個."End Sub代碼的解析說明：上述代碼過程運用工作表函數CountA返回選定區域的非空單元格的個數。其中Application.WorksheetFunction是對工作表函數的引用，Selection是選擇的區域，MsgBox是彈出對話框，反饋結果。備注：前些時有朋友問如何引用EXCEL功能區提示的數據個數，用上述方法即可實現。VBA過程代碼27：返回選定區域的行數Sub MyNZ()MsgBox Selection.Rows.CountEND SUB代碼的解析說明：上述代碼過程返回選定區域的行數。Selection.Rows.Count是選定區域行數的數目，MsgBox是彈出對話框，反饋結果。VBA過程代碼28：返回選定區域的列數Sub MyNZ()MsgBox Selection.Columns.CountEND SUB代碼的解析說明：上述代碼過程返回選定區域的列數。Selection.Columns.Count是選定區域列數的數目，MsgBox是彈出對話框，反饋結果。VBA過程代碼29：返回選定區域的地址Sub MyNZ()MsgBox Selection.AddressEND SUB代碼的解析說明：上述代碼過程返回選定區域的返回選定區域的地址。Selection.Address是選定區域地址，MsgBox是彈出對話框，反饋結果。注意：這里的地址是一種絕對地址的引用。參考：單元格地址絕對引用是在構成單元地址的字母和數字前分別加“$”。絕對引用：就是不管公式在那一列，或者是在那一行，所引用的單元不會因此而發生變化。備注：對于絕對引用和相對引用，有興趣的朋友可以查找一下我之前的文章。他們的變換是F4鍵。VBA過程代碼30：代碼過程在執行過程中將忽略所有的錯誤Sub MyNZ()ON ERROR RESUME NEXT……..……………..END SUB代碼的解析說明：上述代碼過程在執行過程中，如果遇到錯誤會忽略掉，繼續往下執行看板：下面是我根據我自己20多年的VBA實際利用經驗，編寫的幾部經驗教程，全是滿滿的“干貨”，歡迎有需要的朋友聯絡(WeChat:NZ9668)，分享。1 《VBA代碼解決方案》是VBA中各個知識點的講解，覆蓋了絕大多數的知識點。2 《VBA數據庫解決方案》是數據處理的利器；3 《VBA數組與字典解決方案》中講解VBA的精華----字典。4? 面向初學及中級以下學員的視頻《VBA代碼解決方案》正在錄制。看視頻，“每天20分鐘，半年精進VBA”活動正在火熱進行中，越早報名，回饋越多。現在第一冊很快錄制完成。

_____________________________?

有啟發 點在看，轉給朋友?約作者 請留言，直接交流

更多關聯閱讀

總結

以上是生活随笔為你收集整理的vba代码编程800例_VBA编程常用过程代码实例2630的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。