Compartir a través de


Método Range.PasteSpecial (Word)

Inserta el contenido del Portapapeles. .

Sintaxis

expresión. PasteSpecial (IconIndex, Link, Placement, DisplayAsIcon, DataType, IconFileName, IconLabel)

expresión requerida. Variable que representa un objeto Range.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
IconIndex Opcional Variant Si DisplayAsIcon es True, este argumento es un número que corresponde al icono que desea usar en el archivo de programa especificado por IconFilename. Los iconos aparecen en el cuadro de diálogo Cambiar icono: 0 (cero) corresponde al primer icono, 1 corresponde al segundo icono y así sucesivamente. Si se omite este argumento, se usa el primer icono (predeterminado).
Link Opcional Variant True para crear un vínculo al archivo de origen del contenido del Portapapeles. El valor predeterminado es False.
Placement Opcional Variant Puede ser cualquiera de las siguientes constantes WdOLEPlacement: wdFloatOverText o wdInLine. El valor predeterminado es wdInLine.
DisplayAsIcon Opcional Variant True para mostrar el vínculo como un icono. El valor predeterminado es False.
DataType Opcional Variant Un formato para el contenido del Portapapeles cuando se ha insertado en el documento. Puede ser cualquier constante WdPasteDataType.
IconFileName Opcional Variant Si DisplayAsIcon es True, este argumento es la ruta de acceso y el nombre para el archivo en el que está almacenado el icono que se mostrará.
IconLabel Opcional Variant Si DisplayAsIcon es True, este argumento es el texto que aparece debajo del icono.

Ejemplo:

En este ejemplo, se inserta el contenido del Portapapeles en el punto de inserción como texto sin formato.

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

En este ejemplo, se copia el texto seleccionado y se pega en un documento nuevo como hipervínculo. El documento de origen primero debe guardarse para que funcione este ejemplo.

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

Vea también

Objeto Range

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.