Kolonnu diagramma, izmantojot VBA

Anonim

Kā izveidot diagrammu, izmantojot VBA programmā Microsoft Excel

Šajā rakstā mēs uzzināsim, kā izveidot diagrammu, izmantojot Microsoft Excel VBA.

Ar vienkāršu uzdevumu sapratīsim, kā mēs varam izveidot diagrammu, izmantojot Microsoft Excel VBA.

Mums ir dati diapazonā A1: F10, kurā A slejā ir skolēna vārds, B slejā 1, C slejā 2, D slejā 3, E slejā ir kopējais punktu skaits, bet F slejā ir atzīmju vidējais.

Izpildiet tālāk norādītās darbības un kodu:-

  • Ievietojiet komandas pogu cilnē Izstrādātājs> Ievietot> Komandu poga 1.
  • Nospiediet taustiņu Alt+F11, lai atvērtu VBE lapu makro rakstīšanai.
  • Pēc tam dodieties uz cilni Ievietot un ievietojiet moduli.
  • Lapā ierakstiet zemāk minēto kodu.

Privāta apakškomandaButton1_Click ()

Diapazons ("A2: A10, F1: F10"). Atlasiet

ActiveSheet.Shapes.AddChart.Select

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

ActiveChart.ChartType = xlColumnClastered

ActiveSheet.ChartObjects (1). Aktivizēt

ActiveSheet.ChartObjects (1). Izgriezt

Izklājlapas ("Sheet2"). Atlasiet

ActiveSheet.Paste

Izklājlapas ("Sheet1"). Atlasiet

Diapazons ("F11"). Aktivizēt

Beigt apakš

Koda skaidrojums:- Pirmkārt, mēs definēsim diagrammas ievietošanas diapazonu, pēc tam iestatīsim datu avotu un diagrammas veidu. Pirms darbības veikšanas diagrammā mums tā ir jāaktivizē, un pēc tam mēs izvēlamies galamērķi, kur mēs vēlamies ielīmēt diagrammu, un pēc tam mums jāatgriežas 1. lapā.

  • Lai palaistu makro, nospiediet taustiņu F5.
  • Diagramma tiks izveidota darbgrāmatas 2. lapā.

Tādā veidā mēs varam izveidot diagrammu, izmantojot VBA programmā Microsoft Excel.