Conocer cómo crear dinámicamente listas con Visual Basic para aplicaciones puede ahorrar tiempo en el análisis de grandes cantidades de datos . Microsoft Excel se utiliza comúnmente para recoger datos similares a una base de datos Access . Excel ofrece diferentes tipos de gráficos , tales como pastel , líneas, columnas y otros formatos. Los gráficos de columnas se utilizan a menudo en Excel para mostrar gráficamente la información . No es difícil crear gráficos utilizando VBA para presentar los datos con claridad y de manera más eficiente . Instrucciones
1
Abra Microsoft Excel 2007 y haga clic en la pestaña de " desarrolladores" . Seleccione createColumnChart Sub " Visual Basic y escriba " () " y presionar" Enter " para crear un nuevo sub .
2
Type" myChart As Gráfico
Range (" A1" ) . Seleccione
ActiveCell.Value = "Tabla de datos 1 "
Range (" A2" ) . Seleccione
ActiveCell.Value = " 1 "
< p > Range (" A3 ") . Seleccione
ActiveCell.Value = " 2 "
Range (" A4" ) . Seleccione
ActiveCell.Value = " 3 "
Range ( " A5 ") . Seleccione
ActiveCell.Value = " 4 "
Range (" B1" ) . Seleccione
ActiveCell.Value = "Data 2 Gráfico "
Range (" B2" ) . Seleccione
ActiveCell.Value = " 5 "
Range (" B3 ") . Seleccione
< p> ActiveCell.Value = " 6 "
Range (" B4 ") . Seleccione
ActiveCell.Value = " 7"
Range (" B5 ") . Seleccione
ActiveCell.Value = " 8 "
Range (" B6 ") . Seleccione "declarar la variable de tabla y añadir algunos datos para el gráfico.
3
Type " Set myChart = Charts.Add " para añadir un nuevo gráfico.
Type " con myChart
. Name =" Datos gráfico "
. ChartType . = xlColumnClustered
SetSourceData Fuente : = Sheets (" Sheet1" ) Range (" A1: B5 ") . , _
PlotBy : . = xlRows
HasTitle = True
. ChartTitle.Text = "= Hoja1! R1C2 "
. Ejes ( xlCategory , xlPrimary ) . HasTitle = True
. Ejes ( xlCategory , xlPrimary ) . AxisTitle . Characters.Text = " datos del cuadro 1 "
. Ejes ( xlValue , xlPrimary ) . HasTitle = True
. Ejes ( xlValue , xlPrimary ) . AxisTitle.Characters.Text = "Tabla de Datos 2 "
End With" para configurar las propiedades del gráfico .
4
tipo "End sub" si es necesario . Ejecutar los nuevos sub .