Tento tutoriál vám ukáže, jak používat Analysis ToolPak ve VBA.
Analysis ToolPak v aplikaci Excel je doplněk vytvořený, který vám umožní provádět složitou analýzu dat. Pokud chcete tyto funkce volat v kódu VBA, musíte povolit doplněk Analysis ToolPak-VBA.
Povolení doplňku
Klikněte na Soubor Nabídka a poté klikněte na Možnosti, doplňky.
Klikněte na Jít knoflík.
Ujistěte se, že Analysis ToolPak-VBA je zaškrtnuto a klikněte na OK.
Nyní budete moci volat funkce obsažené v nástroji Excel Analysis ToolPak z VBA.
Použití klouzavého průměru ve VBA
Zvažte následující list.
Chcete-li použít funkci z doplňku, musíte použít Spusťte aplikaci a poté název funkce, kterou chcete volat.
Chcete -li vypočítat klouzavý průměr ve sloupci F, můžete napsat následující kód.
123456789 | Dílčí CalculateMovingAverage ()Dim rngVstup jako rozsahDim rngOutPut As Range“naplňte rozsahyNastavit rngInput = rozsah ("E6: E10")Nastavit rngOutPut = rozsah ("F6: F10")'zavolejte funkci z doplňkuApplication.Run "Moveavg", rngInput, rngOutPut,, False, True, FalseEnd Sub |
Pokud nechcete účtovat poplatek, upravte řádek Application.Run na toto
1 | Application.Run "Moveavg", rngInput, rngOutPut,, False, False, False |