Word文档中范围内容的副本

【分享成果，快乐正能量】为什么会对人性失望？因为在你弱小年轻的时候，有最坏的人。你为什么知道人性？因为当你强大的时候，好人最多，坏人没了。你可以相信一个人，但不要相信人性。人性善变《VBA之Word应用》，这是我的第八套教程。教程专门讲解VBA在Word中的应用，重点是“面向对象编程”。先让大家了解Word中VBA的对象、属性、方法，再通过实例让大家感受Word VBA的美好。本教程由三卷十六章组成。今天的内容是第5章“Word中的范围对象(第1部分)”，第7节：Word文档中范围内容的复制。
第八节测距对象的方法(2)大家好。本节我们继续学习Range对象的方法。在上一节中，我们学习了如何使用object方法来统计信息和调整对象的范围。此部分的内容是对象内容的副本。
1.copy方法该方法将指定区域复制到剪贴板。
语法：表达式。复制
expression是必需的，它是一个代表Range对象的变量。
2.范围。Copyaspicture方法该方法类似于Copy方法。
语法：表达式。复制图片
expression是必需的，它是一个代表Range对象的变量。
3.Range.cut方法该方法将指定对象从文档移动到剪贴板。
语法：表达式。切口
expression是必需的，它是一个代表Range对象的变量。
4.示例：内容复制的应用。最后，我们来解释一个例子。在本例中，我们将介绍Copy方法、CopyAsPicture方法和Cut方法的应用。让我们看看下面的代码：
Sub mynzG()
[代码见教程]
末端接头
代码解释：
1)active document . parameters(4)。剪切文档的第四段。
2)设置myRange=ActiveDocument。范围_
(Start:=ActiveDocument。内容。End – 1，End:=ActiveDocument。内容. End – 1)
我的兰芝。粘贴
设置myRange变量，然后粘贴剪切的内容。
3)设置myRange=Nothing清除存储器
4)活动文档.段落(3)。复制第三段。
5)active document . paragraphs . add添加新段落。
6)使用活动文档。段落(活动文档。段落。计数-1)。Range上面的设置对象是最后一段，(最后一段是空的，所以使用活动文档。段落。计数-1)
7)CopyAsPicture复制为图片。
8)折叠方向：=wdCollapseEnd
PasteSpecial数据类型：=wdPasteMetafilePicture
上面的代码粘贴了这张图片。
最后，让我们看看代码的操作：
今天的内容回来了：
1 Word中Range对象的Copy方法、CopyAsPicture方法和Cut方法是什么意思？
2如何复制内容？
本讲座参考程序文件：Doc 005 document.docm。
我有20多年的VBA实战经验，全部浓缩在以下教程里：
【分享成果，快乐正能量】不要介入别人的事情。那与你无关。如果你没有钱，就不要轻易和别人说话。做好自己的事情比什么都好。别人的事和你没关系。除非你能从中获利，否则不要插手别人的事情。本质上，这个世界上只有你一个人，其他人的存在都是虚幻的，虚无缥缈的。你可以只是把别人当成电影或者游戏里的设定，你是唯一的主角。