Grafici in Excel VBA

La visualizzazione è molto importante in tutti i dati. In Excel quando presentiamo i dati in tabelle e pivot, potrebbe essere difficile per un altro utente comprendere lo scenario principale dai dati. Quindi, in Excel, abbiamo grafici per presentare i nostri dati. I grafici sono la rappresentazione visiva dei dati presenti nelle righe e nelle colonne del foglio Excel. Ora sappiamo tutti come inserire un grafico in un foglio di lavoro Excel. In questo argomento, impareremo a utilizzare i grafici in VBA. È semplice come usiamo i grafici in Excel. Ora, come in un foglio di lavoro in cui abbiamo diversi tipi di grafici per cui optare in modo simile, abbiamo tutti i grafici in VBA anche come oggetto. Tutto quello che dobbiamo fare è chiamare quell'oggetto per usarlo. Possiamo creare grafici da VBA nello stesso foglio di lavoro o in un foglio grafico separato. Tuttavia, è consigliabile utilizzare i grafici in un foglio separato per evitare confusione.

Ora, quali sono i grafici in VBA? I grafici sono oggetti semplici in VBA. Possiamo creare due tipi di grafici in VBA. Uno è noto come un foglio grafico mentre un altro è noto come grafici incorporati. Nel foglio grafico, VBA crea un nuovo foglio di lavoro per il grafico. Forniamo i dati di riferimento che rappresentano un altro foglio di lavoro come dati di origine. Ora i grafici incorporati sono quei grafici che sono presenti nello stesso foglio di lavoro dei dati. Ora la codifica per questi due tipi di grafici è leggermente diversa l'una dall'altra che impareremo in questo argomento. Per utilizzare le proprietà del grafico in VBA utilizziamo il punto (.) Come IntelliSense. Ora dobbiamo ricordare una cosa che ci sono vari tipi di grafici in Excel. Se non forniamo un tipo di grafico al nostro codice, VBA crea automaticamente un istogramma per noi per impostazione predefinita. Ovviamente, possiamo cambiarlo con poche righe di codice.

Come creare grafici in Excel VBA?

Ora impariamo come creare grafici in Excel VBA con alcuni esempi.

Puoi scaricare questo modello Excel di grafici VBA qui - Modello Excel di grafici VBA

Per tutti gli esempi considereremo un dato presente nel foglio 1 come segue,

Grafici Excel VBA - Esempio n. 1

Innanzitutto, impariamo come inserire un grafico in VBA, per questo seguire i passaggi seguenti:

Passaggio 1: iniziare con una sottoprocedura come segue.

Codice:

 Grafici secondari1 () End Sub 

Passaggio 2: dichiarare una variabile come oggetto grafico.

Codice:

 Grafici secondari1 () Dim Cht come grafico fine sottotitoli 

Passaggio 3: per utilizzare i grafici è necessario chiamare il metodo add come mostrato di seguito.

Codice:

 Grafici secondari1 () Dim Cht come set di grafici Cht = Grafici. Aggiungi fine somm 

Passaggio 4: per utilizzare le proprietà dell'oggetto grafico, inserire un'istruzione With nel codice come mostrato di seguito.

Codice:

 Grafici secondari1 () Dim Cht come set di grafici Cht = Grafici.Aggiungi con fine Cht con fine sub 

Passaggio 5: Ora forniamo una fonte per questo grafico, inizia con un operatore punto e ci fornirà ulteriori opzioni. Scrivi il seguente codice di seguito per inserire una fonte per il grafico.

Codice:

 Grafici secondari1 () Dim Cht come set di grafici Cht = Grafici.Aggiungi con Cht .SetSourceData Origine: = Fogli ("Foglio1"). Intervallo ("A1: B6") Fine con fine sub 

Passaggio 6: ora ricorda che non abbiamo fornito alcun tipo di grafico, prima eseguiamo il codice sopra premendo il tasto F5 e vedere quale tipo di grafico verrà inserito.

Abbiamo creato un nuovo foglio chiamato Grafico e contiene il nostro grafico.

Passaggio 7: ora diamo al codice il tipo di grafico che vogliamo usare per questa rappresentazione,

Passaggio 8: selezioniamo l'area 3D per questo esempio, come mostrato di seguito,

Codice:

 Sub Charts1 () Dim Cht come set di grafici Cht = Charts.Add With Cht .SetSourceData Source: = Sheets ("Sheet1"). Range ("A1: B6") .ChartType = xl3DArea End with End Sub 

Passaggio 9: eseguire il codice premendo il tasto F5 o facendo clic sul pulsante Riproduci e controllare il tipo di grafico nel foglio di lavoro.

Ora, ricorda ogni volta che eseguiamo il codice creerà un nuovo foglio grafico per noi. Questo è anche noto come foglio grafico perché crea grafici in un altro foglio.

Grafici Excel VBA - Esempio n. 2

Ora facciamo un grafico incorporato che significa grafico nel foglio dei dati di origine. Per questo, seguire i passaggi seguenti per creare un grafico in Excel VBA.

Passaggio 1: nello stesso modulo avviare un'altra sottoprocedura come segue.

 Codice: Sub Charts2 () End Sub 

Passaggio 2: dichiarare nuovamente una variabile come tipo di grafico come segue.

Codice:

 Grafici secondari2 () Dim Cht1 come grafico fine sottotitoli 

Passaggio 3: La differenza nei grafici incorporati è che facciamo riferimento al foglio di lavoro che contiene i dati come foglio attivo con il seguente codice mostrato di seguito.

Codice:

 Grafici secondari2 () Dim Cht1 come set di grafici Cht1 = ActiveSheet.Shapes.AddChart.Chart End Sub 

Passaggio 4: ora il resto della creazione e progettazione dei grafici è simile, di nuovo inseriamo un'istruzione With nel codice come segue.

Codice:

 Grafici secondari2 () Dim Cht1 come set di grafici Cht1 = ActiveSheet.Shapes.AddChart.Chart con Cht1 End With End Sub 

Passaggio 5: Specifichiamo una posizione in cui il nostro grafico sarà come non vogliamo che sia sui nostri dati, quindi prima di With Statement aggiungi il seguente codice a dove avevamo impostato il nostro grafico come segue.

Codice:

 Grafici secondari2 () Dim Cht1 come set di grafici Cht1 = ActiveSheet.Shapes.AddChart (Sinistra: = 200, Larghezza: = 300, Alto: = 50, Altezza: = 300) .Chart Con Cht1 End With End Sub 

Passaggio 6: ora forniamo l'origine dei dati e il tipo di grafico che vogliamo essere come segue.

Codice:

 Grafici secondari2 () Dim Cht1 come set di grafici Cht1 = ActiveSheet.Shapes.AddChart (Sinistra: = 200, Larghezza: = 300, Inizio: = 50, Altezza: = 300). Grafico con Cht1 .SetSourceData Origine: = Fogli ("Foglio1 ") .Range (" A1: B6 ") .ChartType = xl3DArea End With End Sub 

Passaggio 7: eseguire il codice premendo il tasto F5 o facendo clic sul pulsante Riproduci e vedere il risultato nel nostro foglio in cui i dati sono i seguenti.

Questo è chiamato grafico incorporato poiché il grafico si trova nello stesso foglio dei dati.

Grafici Excel VBA - Esempio n. 3

C'è anche un altro modo per creare un grafico nei nostri fogli di lavoro usando VBA. Questo metodo è noto come metodo ChartsObject.

Passaggio 1: nello stesso modulo iniziamo con una terza sottoprocedura come segue.

Codice:

 Grafici secondari3 () End Sub 

Passaggio 2: cono come dati del foglio di lavoro digitare un altro come intervallo e uno come oggetto grafico come mostrato di seguito.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come oggetto grafico Fine oggetto secondario 

Passaggio 3: impostare innanzitutto il foglio di lavoro su dove si trovano i dati, che in questo caso è il foglio 1.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come grafico Set di oggetti WK = fogli di lavoro ("Foglio1") End Sub 

Step 4: Ora seleziona l'intervallo di dati che abbiamo come segue.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come grafico Set di oggetti WK = Fogli di lavoro ("Foglio1") Set Rng = WK.Range ("A1: B6") End Sub 

Passaggio 5: ora imposta l'oggetto grafico per aggiungere il grafico usando la proprietà dell'oggetto grafico come segue.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Sinistra: = ActiveCell.Left, Larghezza: = 400, Superiore: = ActiveCell.Top, Altezza: = 200) End Sub 

Passaggio 6: ora diamo la fonte al grafico come segue.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Sinistra: = ActiveCell.Left, Larghezza: = 400, Superiore: = ActiveCell.Top, Altezza: = 200) Cht3.Chart.SetSourceData Origine: = Rng End Sub 

Passo 7: Ora seleziona il tipo di grafico che desideri in modo simile come segue.

Codice:

 Grafici secondari3 () Dim WK come foglio di lavoro, Rng come intervallo, Cht3 come ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Sinistra: = ActiveCell.Left, Larghezza: = 400, Superiore: = ActiveCell.Top, Altezza: = 200) Cht3.Chart.SetSourceData Fonte: = Rng Cht3.Chart.ChartType = xl3DColumn End Sub 

Passaggio 8: eseguire il codice premendo il tasto F5 o facendo clic sul pulsante Riproduci e vedere il risultato nel foglio 1.

Cose da ricordare

  • Possiamo decidere quale tipo di grafici vogliamo usare impostando un tipo di grafico.
  • Nel tipo di grafico, il numero di volte in cui eseguiamo il codice viene creato un nuovo foglio di lavoro con un nome di grafico univoco con un grafico al suo interno.
  • L'oggetto grafico è anche un membro dei fogli in cui sono presenti sia grafici che fogli.
  • Per utilizzare l'oggetto grafico, è necessario utilizzare un'istruzione SET per impostare prima il grafico.

Articoli consigliati

Questa è una guida ai grafici VBA. Qui discutiamo come creare grafici in Excel usando il codice VBA insieme ad esempi pratici e template Excel scaricabili. Puoi anche consultare i nostri altri articoli suggeriti:

  1. VBA PowerPoint
  2. Grafici di combinazione di Excel
  3. Il file di controllo VBA esiste
  4. Grafico a colonne di Excel

Categoria: