PasteSpecial 方法

       

插入剪贴板上的内容。与 Paste 方法不同,使用 PasteSpecial 方法可以控制所粘贴信息的格式,并且可以建立与源文件(例如,Microsoft Excel 工作表)的链接(可选)。

注意   如果不需要替换指定的区域或所选内容,可在使用本方法之前使用 Collapse 方法。当使用本方法时,区域或所选内容不扩展至包含剪贴板上的内容。

expression.PasteSpecial(IconIndex, Link, Placement, DisplayAsIcon, DataType, IconFileName, IconLabel)

expression   必需。该表达式返回“应用于”列表中的一个对象。

IconIndex  Variant 类型,可选。 如果DisplayAsIconTrue,则本参数是一个数值,该数值对应于由 IconFilename 指定的要在程序文件中使用的图标。图标出现在“插入”菜单的“对象”命令的“新建”选项卡上的“更改图标”对话框中,其中:0(零)对应第一个图标,1 对应第二个图标, 以此类推。如果缺省该参数,则使用第一个(默认)图标。

Link  Variant 类型,可选。如果本参数值为 True,则建立一个到剪贴板源文件的链接,默认值是 False

Placement  Variant 类型,可选。可以是下列 WdOLEPlacement 常量之一:wdFloatOverTextwdInLine,默认值为 wdInLine

DisplayAsIcon  Variant 类型,可选。如果本参数为 True,则将链接显示为图标。默认值是 False

DataType  Variant 类型,可选。将剪贴板中的内容插入到文档时采用的格式。WdPastDataType

IconFileName   Variant 类型,可选。如果 DisplayAsIconTrue,则本参数是保存所要显示的图标的文件路径和名称。

IconLabel   Variant 类型,可选。如果 DisplayAsIconTrue, 则本参数是在图标下面出现的文字。

示例

本示例将剪贴板中的内容作为无格式文本在插入点插入。

Selection.Collapse Direction:=wdCollapseStart
Selection.Range.PasteSpecial DataType:=wdPasteText

本示例复制选中的文本,然后将其作为超链接粘贴到一个新的文档中。必须首先保存源文档,才可看到示例的执行效果。

If Selection.Type = wdSelectionNormal Then
    Selection.Copy
    Documents.Add.Content.PasteSpecial Link:=True, _
        DataType:=wdPasteHyperlink
End If