Compartir a través de


Método Worksheet.PasteSpecial (Excel)

Pega el contenido del portapapeles en la hoja, usando un formato especificado. Use este método para pegar datos de otras aplicaciones o bien para pegarlos con un formato específico.

Sintaxis

expresión. PasteSpecial (Format, Link, DisplayAsIcon, IconFileName, IconIndex, IconLabel, NoHTMLFormatting)

Expresión Variable que representa un objeto Worksheet .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Format Opcional Variant Cadena que especifica el formato de los datos del Portapapeles.
Link Opcional Variant True para establecer un vínculo al origen de los datos pegados. Si los datos de origen no son adecuados para vincularlos, o bien si la aplicación de origen no admite vínculos, no se tendrá en cuenta este parámetro. El valor predeterminado es False.
DisplayAsIcon Opcional Variant True para mostrar los datos pegados como un icono. El valor predeterminado es False.
IconFileName Opcional Variant Nombre del archivo que contiene el icono que se va a usar si DisplayAsIcon es True.
IconIndex Opcional Variant Número de índice del icono para el archivo de iconos.
IconLabel Opcional Variant Rótulo de texto del icono.
NoHTMLFormatting Opcional Variant True para quitar todo el formato, los hipervínculos e imágenes de HTML. Si es False, se pega HTML tal y como está. El valor predeterminado es False.

Comentarios

Nota:

NoHTMLFormatting solo importa cuando Format = "HTML"; en todos los demás casos, NoHTMLFormatting se omite.

Seleccione el rango de destino antes de usar este método.

Es posible que este método modifique la selección de la hoja, según el contenido del Portapapeles.

Para los desarrolladores de idiomas distintos del inglés, puede sustituir una de las siguientes constantes (0-5) para que se correspondan con la cadena equivalente al formato de archivo de imagen.

Argumento Format Cadena equivalente
0 "Imagen (PNG)"
1 "Imagen (JPEG)"
2 "Imagen (GIF)"
3 "Imagen (metarchivo mejorado)"
4 "Mapa de bits"
5 "Objeto de dibujo de Microsoft Office"

Ejemplo:

En este ejemplo se pega un documento de Microsoft Word del Portapapeles en la celda D1 de Sheet1.

Worksheets("Sheet1").Range("D1").Select 
ActiveSheet.PasteSpecial format:= _ 
 "Microsoft Word 8.0 Document Object"

En este ejemplo se pega un objeto de imagen que no se muestra como icono.

Worksheets("Sheet1").Range("F5").PasteSpecial _ 
 Format:="Picture (Enhanced Metafile)", Link:=False,
 DisplayAsIcon:=False 

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.