|
Si observamos los datos que vamos a graficar nos damos cuenta que en la columna A se encuentran los valores ejes (X) yen la columna B los valores series (Y), estos datos son necesario para efectuar una grafica que podría quedar así
Esta grafica muestra las edades de 5 personas, los nombres son los valores ejes y la edad los valores series, ahora veremos como se puede detectar estos datos por medio de una Macro
Al graficar estos datos se genero el siguiente código:
SubMacro1()
-
Range("A5:B10").Select
-
Charts.Add
-
ActiveChart.ChartType = xlColumnClustered
-
ActiveChart.SetSourceData Source:=Sheets("Hoja1").Range("A5:B10"), PlotBy:= _xlColumns
-
ActiveChart.Location Where:=xlLocationAsObject, Name:="Hoja1"
End Sub
- La primer línea indica el rango donde están los datos, valores ejes y valores series,
- La segunda línea indica que se agrega una grafica
- La tercera línea indica el tipo de grafica que se desea
- La cuarta línea indica como se acomodan los datos en la grafica
- La quinta línea indica donde se muestra la grafica, si en la misma hoja o en una sola hoja.
Nota. Los números de 1 al 5 no van en el código, solo los puse para poder explicar las líneas
A continuación se muestran algunos de los diferentes tipos de graficas Línea 3:
ActiveChart.ChartType = xlColumnClustered
ActiveChart.ChartType = xlBarClustered
ActiveChart.ChartType = xlLineMarkers
ActiveChart.ChartType = xlPie
ActiveChart.ChartType = xlXYScatter
ActiveChart.ChartType = xlAreaStacked
ActiveChart.ChartType = xlDoughnut
ActiveChart.ChartType = xlRadarMarkers
ActiveChart.ChartType = xlCylinderColClustered
ActiveChart.ChartType = xlConeColClustered
ActiveChart.ChartType = xlPyramidColClustered
|
|
|
|
|
tutorial realizado por el Profesor Ramón Mendoza Ochoa
|
|