Word中对象方法(Methods)的理解及示例(下)

【分享成果,随喜正能量】当你的见识多了,眼界宽了,格局大了,所有的磨难都将不再是磨难,而是助你成长的阶梯。 。

《VBA之Word应用》(10178982),是我推出第八套教程,教程是专门讲解VBA在Word中的应用,围绕"面向对象编程"讲解,首先让大家认识Word中VBA的对象,以及对象的属性、方法,然后通过实例让大家感受到Word VBA 的妙处。本套教程共三册十六章,今日内容为第一章部分:Word中对象方法(Methods)的理解及示例(下)

第五节Word中对象方法(Methods)的理解及示例

Range方法应用示例,我们看下面的代码:

Sub mynzI() 'Document.Range方法

    Dim r As Range

    MsgBox ActiveDocument.Name

    ActiveDocument.Range(Start:=0, End:=Selection.End).Bold = True

    Set r = ActiveDocument.Range(Start:=0, End:=Selection.End)

    r.Case = wdUpperCase

End Sub

代码截图:

代码讲解:

①MsgBox ActiveDocument.Name 提示给用户当前活动文档的名称

②ActiveDocument.Range(Start:=0, End:=Selection.End).Bold = True

将当前文档从开始到光标所在处字体加粗

③Set r = ActiveDocument.Range(Start:=0, End:=Selection.End)

     r.Case = wdUpperCase

将当前文档从开始到光标所在处字符变成大写

代码的执行效果:执行前的文档:

执行宏:

执行效果:

3方法的特征

从以上的讲解及示例中我们发现,方法通常都带有参数,以限定如何执行操作。如上述示例中range对象范围的确定Range(Start:=0, End:=Selection.End),下面的示例中,我再给出将活动文档打印前三页的代码。

Sub mynzJ() 'Document.PrintOut方法范围打印

     ActiveDocument.PrintOut Range:=wdPrintRangeOfPages, Pages:="1-3"

End Sub

代码截图:

代码的执行效果:

我们先将"Doc 001文档"扩展到四页:

执行程序(我选择了PDF打印),我们看执行后的结果:

今日内容回向:

  1 如何理解Word中对象的方法?

2Word中对象的方法有什么特征?

本讲内容参考程序文件:Doc 001文档.docm

我20多年的VBA实践经验,全部浓缩在下面的各个教程及应用工具中:

相关推荐
ShineWinsu6 分钟前
对于Qt:QTableWidget常见属性以及QTableWidgetItem类的解析
开发语言·c++·qt·gui·客户端·表格·qtablewidget
ShineWinsu1 小时前
对于Qt:QListWidget常见属性以及QListWidgetItem类的解析
开发语言·c++·qt·客户端·列表·qlistwidget·qlistwidgetitem
吴名氏.2 小时前
Java转AI Agent教程(第十二周)检索与切分
java·开发语言·人工智能·ai·ai agent
瑞雪兆丰年兮2 小时前
JavaWeb-day10-SpringBootWeb案例
java·开发语言·javaweb·web
Elastic 中国社区官方博客2 小时前
更少的位数,相同的召回率:DiskBBQ 更保守的自动校准扫描
大数据·运维·开发语言·人工智能·elasticsearch·搜索引擎
三雷科技3 小时前
第6章第4节:自定义分词器
开发语言·c#
Adellle3 小时前
设计模式指南 (Java 版) ㊁
java·开发语言·设计模式
Delightrs4 小时前
Rust LeetCode238 算法题解
开发语言·算法·rust
云上工程笔记4 小时前
SRT字幕一键转手绘动画:srt-whiteboard-animation的复刻实录
大数据·开发语言·javascript·人工智能·机器学习
zhanghaha13144 小时前
C# 系列教程_12 字符串 string 保姆级系统教程(面向新手,大量示例 + 原理讲解)
开发语言·数据库·c#