VBA代码操作代码完整版

VBA 代码操作代码

dadaV20190409

'VBE 对象是根对象，表示在 VBA 编辑器中存在的所有对象的最上层对象，常用对象如

下：

'1、VBAproject 对象:VBE 编辑器中的工程

'2、VBComponents 对象：表示工程中所有的部件集合，包括 Excel 对象、窗体、模块、

类模块。

Option Explicit

'一、返回模块的行数

Sub 返回模块 A 中的总行数()

MsgBox ThisWorkbook.VBProject.VBComponents('A').CodeModule.CountOfLines

End Sub

Sub 返回过程 test 中的总行数()

MsgBox

ThisWorkbook.VBProject.VBComponents('A').CodeModule.ProcCountLines('test',

vbext_pk_Proc)

End Sub