Saltar al contenido

Cosa extraña con macro de graficos


Recommended Posts

publicado

Buenas tardes,

tengo una macro que me hace un gráfico, el problema es que unas veces la ejecuto y me sale bien el gráfico y otras, cuando la ejecuto, (creo que depende de la columna en la que me situo) me añade un gráfico extraño con un montón de series que yo no he creado, ¿a qué se puede deber esto?

Saludos y gracias.

ActiveSheet.Shapes.AddChart.Select

ActiveChart.ChartType = xlXYScatterSmoothNoMarkers

ActiveChart.Parent.RoundedCorners = True

ActiveChart.Location Where:=xlLocationAsObject, Name:="Principal"

n = Len("Principal")

x = Mid(ActiveChart.Name, n + 2, 20)

ActiveSheet.Shapes(x).IncrementLeft 200

ActiveSheet.Shapes(x).IncrementTop -51

ActiveChart.SeriesCollection.NewSeries

ActiveChart.SeriesCollection(1).Name = "=""Datos registrados"""

ActiveChart.SeriesCollection(1).XValues = "='Principal'!$A$8:$A$24"

ActiveChart.SeriesCollection(1).Values = "='Principal'!$B$8:$B$24"

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.