VBA Excel: aktualizace grafu

Microsoft Excel nabízí mnoho možností pro vytváření a analýzu dat. Jedním z hlavních nástrojů v Excelu jsou grafy, které vám umožňují vizualizovat složitá data a zefektivnit proces analýzy.

Při změně dat však musí být aktualizován i graf. Ruční aktualizace grafu s velkým množstvím dat může být časově náročný a neefektivní úkol.

VBA Excel má možnost Automaticky aktualizovat graf. Pomocí maker VBA můžete nakonfigurovat proces aktualizace grafu a automatizovat jeho spuštění. To vám umožní ušetřit čas a usnadnit práci s daty a grafy.

V tomto článku se podíváme na různé způsoby aktualizace grafu pomocí VBA Excel. Ukážeme vám, jak měnit hodnoty grafu, přidávat nebo mazat data, měnit typ a styl grafu a jak aktualizovat graf, když se změní původní data.

Jak aktualizovat graf VBA Excel

V aplikaci VBA Excel může být aktualizace grafu nezbytná, když se změní data v původní tabulce a chcete, aby graf automaticky odrážel tyto změny. Zde je několik kroků, které vám pomohou aktualizovat graf v aplikaci VBA Excel:

1. Otevřete projekt VBA Excel, který obsahuje váš diagram.
2. Najděte graf, který chcete aktualizovat. Může to být objekt ChartObject nebo Chart.
3. Chcete-li graf aktualizovat, budete muset změnit data a/nebo nastavení grafu. Zde je několik způsobů, jak to můžete udělat:
   • Změňte data v původní tabulce, na které graf závisí. Graf se automaticky aktualizuje, když změníte data.
   • Použijte vlastnost Chart.SeriesCollection přidat, odstranit nebo změnit data v diagramu. Můžete například použít metodu .FormulaR1C1 pro změnu vzorce datového rozsahu.
   • Použijte vlastnosti Chart.ChartArea a Chart.PlotArea pro změnu nastavení grafu, jako je barva pozadí nebo osy.
4. Jakmile provedete změny v datech nebo nastavení grafu, zavolejte metodu Chart.Refresh pro aktualizaci grafu. To se použije na jakékoli změny, které jste provedli, a graf bude přestavěn.

Aktualizace grafu v aplikaci VBA Excel může být užitečná,když je vyžadována automatická aktualizace grafického zobrazení dat při změně dat. Pomocí těchto kroků aktualizujte graf a zlepšete vizuální reprezentaci dat ve vašem projektu VBA Excel.

Krok 1: Určete úroveň aktualizace grafu

Než začnete aktualizovat graf v aplikaci VBA Excel, musíte určit, na jaké úrovni chcete provádět aktualizace. Excel má dvě hlavní úrovně aktualizace grafu:

1. Úroveň údajů: V této úrovni můžete aktualizovat pouze data, která jsou použita v grafu. Můžete změnit původní data a automaticky zobrazit aktualizovaný graf.

2. Úroveň formátování: V této úrovni můžete aktualizovat nejen Data, ale také formátovat prvky grafu, jako jsou barvy, písma, legendy atd. můžete zcela změnit vzhled grafu.

Výběr úrovně aktualizace závisí na vašich potřebách. Pokud potřebujete aktualizovat pouze data, pak stačí pracovat na datové úrovni. Pokud potřebujete mít plnou kontrolu nad vzhledem grafu, budete muset pracovat na úrovni formátování.

V následujících krocích se podrobně podíváme na to, jak aktualizovat graf na každé úrovni pomocí VBA Excel.

Krok 2: Získejte přístup k datům grafu

Chcete-li aktualizovat graf v Excelu pomocí VBA, musíte získat přístup k datům, na kterých je graf postaven. Pro začátek určíme, která data se v grafu používají.

Graf v Excelu může být založen na datech uvedených v listu excelové tabulky. K získání přístupu k těmto datům lze použít objekty a metody VBA poskytované Excelem.

Zde je příklad kódu, ke kterému lze přistupovat k datům diagramu:

Příklad použití těchto objektů a metod:

Dim ws As WorksheetDim cht As ChartDim ser As SeriesSet ws = ThisWorkbook.Worksheets("Лист1")Set cht = ws.ChartObjects("Диаграмма 1").ChartSet ser = cht.SeriesCollection(1)ser.Values = ws.Range("A1:A10")ser.XValues = ws.Range("B1:B10")

V tomto příkladu přistupujeme k listu tabulky Excel a diagramu podle názvu a indexu. Poté přistupujeme k první řadě dat v diagramu a nastavujeme jí nové hodnoty získané z rozsahu na listu tabulky.

Nyní, když máme přístup k datům grafu, můžeme k aktualizaci grafu použít jiné metody a Vlastnosti VBA Excel.

Krok 3: Změňte data grafu

Chcete-li změnit data v grafu, musíte je aktualizovat v původní tabulce. Chcete-li to provést , použijte funkci Range pro přístup k požadovaným buňkám.

Níže je uveden příklad kódu, který mění hodnoty ve sloupci A na listu data a poté aktualizuje graf pomocí nových dat:

Dim ws As WorksheetDim rng As RangeSet ws = ThisWorkbook.Worksheets("Данные")Set rng = ws.Range("A1:A5") ' измените диапазон на нужный' изменяем данные в столбце Arng.Value = Array(10, 15, 20, 25, 30)' обновляем диаграммуws.ChartObjects("Диаграмма 1").Chart.SetSourceData rng

V tomto příkladu definujeme proměnnou ws jako pracovní list s názvem Data a proměnnou rng jako rozsah buněk ve sloupci A (v tomto případě od A1 do A5).

Dále změníme hodnoty ve sloupci A nastavením nových hodnot pomocí funkce Range.Value a pole hodnot.

Nakonec aktualizujeme graf pomocí metody setsourcedata diagramu a zadáme nový datový rozsah rng .

Když spustíte tento kód, hodnoty ve sloupci A na listu data se změní a graf bude aktualizován o nová data.

Při změně datového rozsahu buďte opatrní, aby odpovídal vašim konkrétním potřebám a struktuře dat.