Diagramă coloană prin VBA

Anonim

Cum se creează o diagramă prin VBA în Microsoft Excel

În acest articol, vom învăța cum să creăm o diagramă prin VBA în Microsoft Excel.

Să înțelegem, cu un exercițiu simplu, cum putem crea o diagramă prin VBA în Microsoft Excel.

Avem date în intervalul A1: F10 în care coloana A conține numele studentului, coloana B Mărci 1, coloana C Mărci 2, coloana D Mărci 3, coloana E conține Punctaj total, iar coloana F conține Media notelor.

Urmați pașii și codul de mai jos: -

  • Introduceți un buton de comandă din fila Dezvoltator> Inserare> Buton de comandă 1.
  • Apăsați tasta Alt + F11 pentru a deschide pagina VBE pentru a scrie macro-ul.
  • Apoi accesați fila de inserare și introduceți un modul.
  • Scrieți mai jos codul menționat în pagină.

Private Sub CommandButton1_Click ()

Gama ("A2: A10, F1: F10"). Selectați

ActiveSheet.Shapes.AddChart.Select

ActiveChart.SetSourceData Source: = Range ("'Sheet1'! $ A $ 2: $ A $ 10, 'Sheet1'! $ F $ 2: $ F $ 10")

ActiveChart.ChartType = xlColumnClustered

ActiveSheet.ChartObjects (1). Activați

ActiveSheet.ChartObjects (1) .Cut

Foi („Sheet2”). Selectați

ActiveSheet.Paste

Foi („Foaie1”). Selectați

Gama ("F11"). Activați

Sfârșitul Sub

Explicarea codului: - Mai întâi, vom defini gama de selecție pentru a insera graficul, apoi vom seta sursa de date și tipul graficului. Înainte de a efectua o acțiune pe diagramă, trebuie să o activăm și apoi să selectăm destinația în care dorim să lipim diagrama noastră, iar după aceea trebuie să revenim la foaia 1.

  • Pentru a rula macro-ul, apăsați tasta F5.
  • Diagrama va fi creată în foaia 2 a registrului de lucru.

Acesta este modul în care putem crea o diagramă prin VBA în Microsoft Excel.