您的位置 首页 > 职场江湖

【word怎么复制上面所有】复制Word文档的Range内容

《分享成果,顺熙正能量》为什么对人性失望?你软弱的时候,坏人最多,所以为什么理解人性?因为当你强大的时候,好人最多,坏人都不见了。你可以相信某人,但不要相信人性。人性是反复无常的

《VBA之Word应用》,我推出的第八个教程,教程专门讲解VBA在Word中的应用,以“面向对象编程”为中心,首先在Word中了解VBA的对象和对象的属性、方法,然后通过例子感受Word VBA的妙处,本教程共3卷16章,今天的内容为5

第8节Range对象方法(2)

大家好,在本节中,我们继续学习Range对象的方法,在上一节中,我们学习了使用对象方法调整信息统计和对象范围。本节的内容是对象内容的克隆。

1 Range。Copy方法

此方法将指定的范围复制到剪贴板。

语法:ex

其中expression是必需的,是表示Range对象的变量。

2 Range。CopyAsPicture方法

此方法类似于复制方法。

语法:expression。CopyAsPicture

其中expression是必需的,是表示Range对象的变量。

3 Range。Cut方法

此方法将指定的对象从文档移动到剪贴板。

语法:ex

其中expression是必需的,是表示Range对象的变量。

4示例:内容复制应用程序

最后,我们将讨论Copy方法、CopyAsPicture方法和Cut方法的实例应用程序。让我们看看下面的代码。

Sub mynzG()

[请参阅代码教程]

End Sub

代码解释:

1)剪下Ac(4).Range.Cut文件的第四段

2)Set myRange=Ac _

(Start:=Ac-1,End:=Ac-1)

MyRange。Paste

设置MyRange变量并粘贴剪切的内容

3)Set myRange=Nothing空内存

4)复制Ac(3).Range.Copy第三段

5)交流电。添加Add新段落

6)With Ac(Ac)。Count-1)。Range或更高版本将对象设置为最后一段,最后一段为空,因此Ac .使用Count-1

7)将CopyAsPicture复制到图片中

8)collapse direction :=wdcollapseend

pastespecial datatype :=wdpastemetafilepicture

上面的代码粘贴了这张图片。

最后,我们看到代码的运行。

今天的内容返回:

1在Word中,Range对象的Copy方法、CopyAsPicture方法和Cut方法的含义是什么?

2如何执行内容复制?

本课程内容参考计划文件:Doc 005文档。docm

我有20多年的VBA实践经验,全部集中在下一个教程中。

【分享成果,根据喜悦获得正能量】少混别人的工作。那与你无关,没钱,众人的话也不轻言相劝,吃人短,使人软弱,做好自己的事情比什么都强。别人的任何事都与你无关。如果你不能从中获益,就不要插手别人的事。这个世界本质上只有你一个人,别人的存在是虚幻的,虚无缥缈的。你可以把别人作为电影或游戏的设定。只有你是主角。是你。

关于作者: luda

无忧经验小编鲁达,内容侵删请Email至wohenlihai#qq.com(#改为@)

热门推荐