300 Príkladov

Programovacie grafy

Programming Charts

Ďalej sa pozrieme na dva programy v Excel VBA . Jeden program prechádza všetkými grafmi na hárku a zmení každý graf na koláčový graf. Druhý program niektoré zmení vlastnosti prvého grafu .



1. Vytvorte niekoľko grafov (alebo si stiahnite súbor programu Excel).

Programovacie grafy v programe Excel VBA





Miesto a príkazové tlačidlo do pracovného hárka a pridajte nasledujúce riadky kódu:

1. Najprv musíme deklarovať objekt ChartObject. Objekt ChartObject funguje ako kontajner pre objekt Chart. Voláme ChartObject cht, ale môžete použiť akékoľvek meno.



ŽiadnychtAkoChartObject

2. Kolekcia ChartObjects obsahuje všetky vložené grafy na jednom hárku. Chceme previesť všetky grafy na prvom hárku. Pridajte nasledujúcu slučku For Every Next.

či a potom výroky v exceli
Pre KaždýchtVPracovné listy (1) .ChartObjects

Ďalšiecht

3. Objekt Chart predstavuje diagram v zošite. Pridajte nasledujúci riadok kódu do slučky For Every Next, aby sa každý graf zmenil na koláčový graf.

vytváranie rozbaľovacej ponuky v programe Excel
cht.Chart.ChartType = xlPie

Poznámka: cht opäť funguje ako kontajner pre objekt Chart. Na zmenu typu grafu používame vlastnosť ChartType. Na zmenu každého grafu na koláčový graf používame vstavanú konštantu xlPie.

4. Výsledok po kliknutí na príkazové tlačidlo na hárku:

Výsledok programovacích grafov

Teraz zmeníme niektoré vlastnosti prvého grafu.

Umiestnite ďalšie príkazové tlačidlo do pracovného hárka a pridajte nasledujúce riadky kódu:

5. Kolekcia ChartObjects obsahuje všetky vložené grafy na jednom hárku. Na aktiváciu prvého grafu pridajte nasledujúci riadok kódu:

Pracovné listy (1). ChartObjects (1). Aktivovať

Tento graf môžeme teraz označovať ako ActiveChart.

6. Pridajte nasledujúci riadok kódu na zmenu názvu grafu.

ActiveChart.ChartTitle.Text = 'Správa o predaji'

7. Pridajte nasledujúci riadok kódu a legendu presuňte na koniec grafu:

ActiveChart.Legend.Position = xlBottom

8. Výsledok po kliknutí na príkazové tlačidlo na hárku:

Výsledok programovacích grafov

Excel importovať dáta z textového súboru

8/8 Dokončené! Získajte viac informácií o knihách a listoch>
Prejsť na nasledujúcu kapitolu: Objekt dosahu



^