Microsoft Excel è un programma di foglio popolare che crea anche grafici e diagrammi di tutte le varietà . Parte di Microsoft Office , Excel rende la visualizzazione e l'analisi dei dati facile e veloce . Tuttavia, se avete bisogno di creare un gran numero di grafici , farlo a mano, può essere in termini di tempo e soggetto a errori . Invece , è possibile utilizzare Microsoft Visual Basic . NET , nuovo e migliorato il linguaggio di programmazione Visual Basic di Microsoft, per automatizzare il compito . La sua integrazione built-in di Excel rende questo un gioco da ragazzi . Cose che ti serviranno
Microsoft Excel ( Developer o Professional edition ) per Microsoft Visual Basic . NET
Mostra più istruzioni
1

Aprire Visual Basic. NET e creare un nuovo progetto .

2 Fare clic con il progetto e scegliere Aggiungi riferimento . Vai alla scheda COM e fare clic su Libreria oggetti di Microsoft Excel . Fare clic su OK .
3

Aggiungi codice nella funzione principale del progetto per creare una nuova istanza dell'applicazione Excel . Dovrebbe apparire così:

Dim excelApp As New Microsoft.Office.Interop.Excel.Application ( ) economici 4

aggiungere il codice per creare un nuovo foglio di calcolo . Per esempio :

Dim wb Come Microsoft.Office.Interop.Excel.Workbook = excelApp.Workbooks.Add ( ) economici 5

Aggiungere codice per recuperare il foglio di lavoro primario dal foglio di calcolo . Per esempio :

Dim foglio Come Microsoft.Office.Interop.Excel.Worksheet = wb.ActiveSheet
6

aggiungere dati al foglio di calcolo. Ad esempio, per impostare il valore nella cella in alto a sinistra del foglio di calcolo ( cella A1 ) a 5 , la cella A2 a 8, e A3 a 4, scrivere il seguente codice :

sheet.Cells ( 1 , 1) . Valore = 5sheet.Cells ( 1 , 2) . Valore = 8sheet.Cells ( 1 , 3) . Valore = 4

Fate questo per tutti i dati che desideri utilizzare nel grafico.
7

aggiungere il codice per creare il grafico :

grafico Dim Come Microsoft.Office.Interop.Excel.Chart = sheet.Parent.Charts.Add ( ) chart.ChartWizard (foglio . Range ("A1 : A3 " ) , Microsoft.Office.Interop.Excel.XlChartType.xl3DColumn , , Excel.XlRowCol.xlColumns ) economici 8

aggiungere il codice per impostare la serie di dati per il grafico :

Dim serie Come Microsoft.Office.Interop.Excel.Series = chart.SeriesCollection ( 1 ) series.XValues ​​= sheet.Range ( " A1 " , "A3" ) economici 9 < p > Il grafico è ora completa . È possibile personalizzarla ulteriormente utilizzando le funzioni fornite da Office Developer Center di Microsoft Developers Network a http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.chart ( office.11 ​​) . Aspx