Метод Range.PasteSpecial (Word)
Вставляет содержимое буфера обмена. .
Синтаксис
expression. PasteSpecial (IconIndex, Link, Placement, DisplayAsIcon, DataType, IconFileName, IconLabel)
выражение (обязательно). Переменная, представляющая объект Range .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| IconIndex | Необязательный | Variant | Если параметр DisplayAsIcon имеет значение True, этот аргумент представляет собой число, соответствующее значку, который вы хотите использовать в файле программы, заданном параметром IconFilename. Значки отображаются в диалоговом окне Изменить значок : 0 (ноль) соответствует первому значку, 1 соответствует второму значку и т. д. Если этот аргумент опущен, используется первый значок (по умолчанию). |
| Link | Необязательный | Variant | Значение true , чтобы создать ссылку на исходный файл содержимого буфера обмена. Значение по умолчанию — False. |
| Placement | Необязательный | Variant | Может быть любой из следующих констант WdOLEPlacement : wdFloatOverText или wdInLine. Значение по умолчанию — wdInLine. |
| DisplayAsIcon | Необязательный | Variant | Значение true , чтобы отобразить ссылку в виде значка. Значение по умолчанию — False. |
| DataType | Необязательный | Variant | Формат для содержимого буфера обмена при вставке в документ. Может быть любой константой WdPasteDataType . |
| IconFileName | Необязательный | Variant | Если параметр DisplayAsIcon имеет значение True, этот аргумент является путем и именем файла, в котором хранится отображаемый значок. |
| IconLabel | Необязательный | Variant | Если параметр DisplayAsIcon имеет значение True, этот аргумент представляет собой текст, который отображается под значком. |
Пример
В этом примере содержимое буфера обмена вставляется в точку вставки как неформатированный текст.
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.