Šī apmācība parādīs, kā izmantot analīzes rīku komplektu VBA.
Analīzes rīku pakotne programmā Excel ir pievienojumprogramma, kas izveidota, lai jūs varētu veikt sarežģītu datu analīzi. Ja vēlaties izsaukt šīs funkcijas VBA kodā, jums jāiespējo Analysis ToolPak-VBA pievienojumprogramma.
Iespējojot pievienojumprogrammu
Noklikšķiniet uz Fails Izvēlne un pēc tam noklikšķiniet uz Iespējas, pievienojumprogrammas.
Noklikšķiniet uz Iet pogu.
Pārliecinieties, ka Analīzes rīksPak-VBA ir atzīmēta un noklikšķiniet uz Labi.
Tagad no VBA varēsit izsaukt Excel analīzes rīku pakotnē ietvertās funkcijas.
Slīdošā vidējā izmantošana VBA
Apsveriet šādu darblapu.
Lai izmantotu funkciju no pievienojumprogrammas, jums jāizmanto Lietošana. Palaist un pēc tam tās funkcijas nosaukumu, kuru vēlaties izsaukt.
Lai aprēķinātu slīdošo vidējo vērtību slejā F, varat uzrakstīt šādu kodu.
123456789 | Sub CalculateMovingAverage ()Dim rngInput As RangeDim rngOutPut As Range'aizpildiet diapazonusIestatīt rngInput = Diapazons ("E6: E10")Iestatīt rngOutPut = Diapazons ("F6: F10")'izsauciet funkciju no pievienojumprogrammasApplication.Run "Moveavg", rngInput, rngOutPut,, False, True, FalseBeigu apakš |
Ja nevēlaties iekasēt maksu, mainiet lietojumprogrammu. Palaidiet rindu līdz šim
1 | Application.Run "Moveavg", rngInput, rngOutPut,, False, False, False |