在word vba中可以使用range对象或者selection对象的Information属性来获取当前光标所在的word文档的页码。
代码如下：
Sub QQ1722187970()
C[......]
阅读全文>>> -
如何用vba返回当前光标所在的word页码？
-
如何用vba查找提取多个word文档中的关键字并创建超链接？
需要查找同一文件夹下的多个word文档，查看是否包含关键字，如果有，则把关键字所在的段落内容提取出来，并创建超链接，可以打开对应的word文档。
代码如下：
Dim oWord As Object[......]
阅读全文>>> -
如何用vba在word中快速移动或选中内容区域？
-
如何用vba在空白的word文档中逐段落的添加文本内容？
要用vba在空白的word文档中逐段落的添加文本内容，可以使用word的Selection对象的TypeText方法和TypeParagraph方法。
其中TypeText方法是在当前光标所在的位置入插[……]
阅读全文>>> -
如何在vba中编写左右移位运算函数？
-
如何用vba获取QQ网络数据采集时的bkn参数？
在进行QQ相关内容的网络数据采集时，经常看到需要附带bkn参数的时候。
如
https://qun.qq.com/cgi-bin/qunwelcome/myinfo?callback=?&bk[......]
阅读全文>>> -
如何用vba获取沪深A股的所有交易日的日期？
A股的交易日规定为凡是法定节假日和周末都不算交易日，其它日期都算交易日。
基于以上的知识，可以使用如下的代码获取2018年整年的沪深A股的所有交易日的日期：
Sub QQ1722187970()[......]
阅读全文>>> -
如何用vba合并多个excel工作簿文件的内容？
将多个工作簿的内容合并到一个工作簿是一个经常会碰到的问题。
它的一般步骤是：
1.打开结果工作簿
2.遍历要合并的工作簿所在的文件夹
3.打开其中一个工作簿
4.将数据写入结果工[……]
阅读全文>>> -
如何写vba根据任意选择的字段名拆分工作表数据？
将单元格区域的数据按照某个字段进行拆分，是一个经常需要遇到的问题。
以下代码利用字典按照任意字段拆分单元格区域的数据，同时将拆分后的数据单独另存为一个excel工作簿。
Sub QQ172218797[......]
阅读全文>>> -
如何在vba中用FileDialog打开选择文件对话框时筛选过滤文件？
在如何用vba打开选择文件和选择文件夹对话框？ 一文中我们介绍了使用vba内置的FileDialog对象用于操作打开文件和选择文件夹对话框。
当用 Application.FileDialog(msoF[……]
阅读全文>>>
感谢你的支持，我将持续地写出更好的文章。
微信支持
微信公众号
