对于vba代码很多的时候,如果要批量删除vba代码中的代码注释,或者代码空行,可以使用如下的通用代码:
以下代码将批量删除工作表1中的所有vba代码中的注释和空行。
[crayon-603b6efb0[……]
关注和分享Excel以及Office系列软件的方方面面,致力于提高中国的办公软件的使用水平
对于vba代码很多的时候,如果要批量删除vba代码中的代码注释,或者代码空行,可以使用如下的通用代码:
以下代码将批量删除工作表1中的所有vba代码中的注释和空行。
[crayon-603b6efb0[……]
要用vba将vba工程中的所有模块导出,需要用到CodeModule对象的Export方法,代码如下:
1 2 3 4 5 6 7 8 9 10 11 12 |
Sub QQ1722187970() Dim oVC As VBComponent Dim sPath As String sPath = Excel.ThisWorkbook.Path For Each oVC In Excel.ThisWorkbook.VBProject.VBComponents With oVC sName = .Name '导出 .Export sPath & "\" & sName End With Next End Sub |
[……]
阅读全文>>>如下图所示:
在vba工程中有窗体(UserForm1)、类模块(类1)、标准模块(模块1、模块2),文档模块(Sheet1、ThisWorkbook)等组件。
以下示例代码可以遍历所有组[……]
阅读全文>>>如下图所示:
在vbe中当前选中的是标准模块中的“模块1”,在vba中可以使用VBE对象的SelectedVBComponent属性返回当前选中的vba工程中的组件。
以下示例代码将返回当[……]
阅读全文>>>