vba除了可以访问excel中的内置对象，还可以访问vbe对象。
vbe对象是vba中所有对象的根对象，通过vbe对象可以访问vba工程对象VBProject。
如果要顺利的访问vba工程对象需要[……]
阅读全文>>>-
如何用vba访问操作vba工程对象VBProject？
-
如何在word文档添加第X页，共X页并且会自动更新的页码？
如下图所示
形如“第X页，共X页”的页码格式可以通过以下的步骤来插入：
双击“页脚”在弹出的“页眉和页脚工具”选项卡下的“插入”工作组中选择“文档部件”下拉菜单下的“域”命令。
第一[……]
阅读全文>>> -
如何在vba中使用WithEvents关键字？
WithEvents 是用于在定义变量时添加表示该变量是将要响应事件的变量，它只能用于类模块中。
vba中有很多对象是可以响应事件，在添加WithEvents定义变量的同时就可以看到哪些对象是可以响应事[……]
阅读全文>>> -
如何用vba把excel文件发布转化为pdf格式文件？
在office 2007版本以后，微软新增了将excel文件发布转化为pdf格式文档的功能。
操作上可以单击“文件”选项卡，然后单击“导出”命令，可以选择将excel 工作簿导出为PDF文档。
在[……]
阅读全文>>> -
如何在vba中调用选择性粘贴的功能？
如下图所示，
选择性粘贴可以实现很多功能，比如将单元格内容转置，跳过空单元格等等。
在vba中可以通过调用range对象的PasteSpecial方法。
它的语法如下
expr[……]
阅读全文>>> -
如何在vba中调用excel的排序功能？
如下图所示
如果要在vba中对A1：B7单元格区域按照销售额进行排序，可以使用如下的代码
12345678910111213141516171819202122232425262728Sub QQ1722187970()Dim oWK As WorksheetSet oWK = Excel.Worksheets("Sheet1")Dim oSort As SortDim iRow As LongWith oWKiRow = .Range("a65536").End(xlUp).RowEnd WithSet oSort = oWK.SortWith oSort'删除原来的排序字段.SortFields.Clear'添加新的排序字段,第一个关键字.SortFields.Add Key:=oWK.Range("a1"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortTextAsNumbers'添加新的排序字段,第二个关键字.SortFields.Add Key:=oWK.Range("b1"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal'设置排序的单元格区域.SetRange oWK.Range("a1:b" & iRow)'设置排序的方法.SortMethod = xlPinYin'设置排序的方向.Orientation = xlSortColumns'设置是否包含列标题.Header = xlYes'开始排序.ApplyEnd WithEnd Sub在vba中调用excel的排序功能[……]
阅读全文>>> -
如何在vba中使用IRibbonUI对象？
当我们在vba中定义一个变量为对象时，需要将具体的某个对象实例赋值给这个变量才能正常使用。
如下代码所示，oWK变量被定义为工作表对象，然后用set语句将第一个工作表赋值给这个变量，这个变量才具有使用价[……]
阅读全文>>> -
如何在自定义功能区时添加编辑框（editBox）的控件？
如下图所示
在自定义功能区时，可以通过如下自定义功能区XML代码添加类似VBA中标签+文本框的控件。
1234567891011121314151617181920<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" ><ribbon ><tabs ><tab idMso="TabDeveloper" visible="false" ></tab><tabid="Tab1"label="自定义选项卡"><groupid="Group1"label="自定义组"><editBox id="editBox1" label="请输入内容："/></group ></tab ></tabs ></ribbon ></customUI >[……]
阅读全文>>>
感谢你的支持，我将持续地写出更好的文章。
微信支持
微信公众号
