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

  • Post author:
  • Post category:其他


蓝字关注,加微信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.Count END SUB 代码的解析说明:上述代码过程返回选定区域的行数。 Selection.Rows.Count是选定区域行数的数目,MsgBox是弹出对话框,反馈结果。