Този урок ще ви покаже как да използвате Analysis ToolPak във VBA.
ToolPak за анализ в Excel е добавка, създадена, за да ви позволи да правите сложен анализ на данни. Ако искате да извикате тези функции във VBA код, трябва да активирате добавката Analysis ToolPak-VBA.
Активиране на добавката
Кликнете върху Файл Меню и след това щракнете върху Опции, добавки.
Кликнете върху Отивам бутон.
Уверете се, че ToolPak-VBA за анализ е отметнато и щракнете върху OK.
Вече ще можете да извиквате функциите, съдържащи се в инструмента за анализ на Excel от VBA.
Използване на плъзгащата средна във VBA
Помислете за следния работен лист.
За да използвате функция от добавката, трябва да използвате Application.Run и след това името на функцията, която искате да извикате.
За да изчислите пълзящата средна стойност в колона F, можете да напишете следния код.
123456789 | Sub CalculateMovingAverage ()Dim rngInput As RangeЗатъмнете rngOutPut As Range'попълнете диапазонитеЗадайте rngInput = Диапазон ("E6: E10")Задайте rngOutPut = Обхват ("F6: F10")'извикайте функцията от добавкатаApplication.Run "Moveavg", rngInput, rngOutPut,, False, True, FalseEnd Sub |
Ако не искате да извеждате такса, променете Application.Run на това
1 | Application.Run "Moveavg", rngInput, rngOutPut,, False, False, False |