• 如何用vba使word表格的行高自动匹配单元格内容?

    在excel中可以使用range对象的AutoFit属性使单元格的行高和列宽自动匹配单元格的内容。

    但是word的表格没有这个属性,只能通过逐行设置word表格的行高为0才能使得行高自动调整为匹配单元格内容的高度。

    代码如下

    阅读全文

  • 如何用vba访问使用word的“行对象”?

    在word vba 中并没有行对象,因此如果要对word文档的逐行内容进行访问和处理的话,需要进行一些变通。

    在word 中可以使用定位(GoTo)功能定位到具体的行,利用这个功能可以实现对word 的逐行访问。

    比如以下代码将逐行遍历Word文档的内容,然后将含有字符“元”的行内容删除[……]

    阅读全文

  • 如何用vba返回word文档的总行数?

    word vba 里面有页(Page)、段落(Paragraph)对象,但是却没有行对象。

    在对word文档进行逐行遍历时,需要知道word文档内容的总行数。

    word vba 中提供了一个便捷的方法可以快速地获得word文档内容的总行数。
    在word vba 中利用Document对[……]

    阅读全文

  • 如何用vba快速地生成罗马数字1到10?

    罗马数字1到10分别为Ⅰ、Ⅱ、Ⅲ、Ⅳ、Ⅴ、Ⅵ、Ⅶ、Ⅷ、Ⅸ、Ⅹ。

    有时候我们需要在vba中快速地获取这10个字符,根据标准GB 18030-2005 信息技术 中文编码字符集,可以找到罗马数字对应的字符编码,如下图所示

    1

    其中罗马数字Ⅰ对应的双字节十六进制编码为2160,由于chrw[……]

    阅读全文

  • 如何在excel实现进制之间的转换?

    在excel中内置了excel函数可以实现各种进制之间的转换,比如十进制转换为二进制,十进制转换为十六进制。

    比如要把十进制的数200转换为二进制数可以使用如下的工作表函数

    =DEC2BIN(200,8)

    如果要把十进制的数200转换为十六进制数可以使用如下的工作表函数

    =D[……]

    阅读全文