vba代码编程800例_VBA编程常用过程代码实例2630

蓝字关注，加微信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”活动正在火热进行中，越早报名，回馈越多。现在第一册很快录制完成。

_____________________________ 

有启发 点在看，转给朋友 约作者 请留言，直接交流

更多关联阅读