Excel - Me ayudarian a saber que hace este codigo?

 
Vista:
Imágen de perfil de Juan Manuel
Val: 5
Ha aumentado su posición en 15 puestos en Excel (en relación al último mes)
Gráfica de Excel

Me ayudarian a saber que hace este codigo?

Publicado por Juan Manuel (2 intervenciones) el 27/10/2019 22:02:12
Estoy empezando a aprender a usar Visual basic y me pasaron este codigo pero no se que hace

¿Podrian ayudarme?

1
2
3
4
5
6
7
8
9
Sub Macro1()
'
' Macro1
' '
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xl3DColumnClustered
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Values = "=Graphic!$A$1:$A$6"
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Héctor Madriz
Val: 826
Bronce
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Me ayudarian a saber que hace este codigo?

Publicado por Héctor Madriz (137 intervenciones) el 29/10/2019 01:43:26
Buen día,

1
2
3
4
ActiveSheet.Shapes.AddChart.Select ' Crea un gráfico
ActiveChart.ChartType = xl3DColumnClustered 'Establece el tipo de gráfico a 3D agrupada
ActiveChart.SeriesCollection.NewSeries ' inicia/crea la serie
ActiveChart.SeriesCollection(1).Values = "=Graphic!$A$1:$A$6" ' valores de la serie

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar