Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Pega los datos de gráfico que contiene el Portapapeles en el gráfico.
Sintaxis
expresión. Pegar (tipo)
expresión Una variable que representa un objeto Chart.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Type | Opcional | Variant | Especifica la información del gráfico para pegar si hay un gráfico en el Portapapeles. Puede ser uno de los siguientes valores: 4104 Todo se pegará. Este es el valor predeterminado. 4122 Se pegan los formatos de origen copiados. Se pegan 4123 fórmulas. |
Ejemplo
En el siguiente ejemplo se activa el libro de Microsoft Excel asociado al primer gráfico del documento activo. Si el libro de Excel tiene varias ventanas, el ejemplo activa la primera ventana. A continuación, el ejemplo copia el contenido en las celdas desde la B1 hasta la B5 y pega el contenido de las celdas en el gráfico.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.ChartData.Activate
.Chart.ChartData.Workbook. _
Worksheets("Sheet1").Range("B1:B5").Copy
.Chart.Paste
End If
End With
Vea también
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.