Denne opplæringen viser deg hvordan du bruker Analysis ToolPak i VBA.
Analysis ToolPak i Excel er et tillegg som er opprettet for å gjøre deg i stand til å gjøre komplisert dataanalyse. Hvis du ønsker å kalle disse funksjonene i VBA-kode, må du aktivere Analysis ToolPak-VBA-tillegget.
Aktivering av tillegget
Klikk på Fil -Menyen, og klikk deretter Alternativer, tillegg.
Klikk på Gå knapp.
Sørg for at AnalyseverktøyPak-VBA er merket og klikk OK.
Du vil nå kunne ringe funksjonene i Excel Analysis ToolPak fra VBA.
Bruke glidende gjennomsnitt i VBA
Vurder følgende regneark.
For å bruke en funksjon fra tillegget må du bruke Application.Run og deretter navnet på funksjonen du vil ringe.
For å beregne det glidende gjennomsnittet i kolonne F, kan du skrive følgende kode.
123456789 | Sub CalculateMovingAverage ()Dim rng Inngang som områdeDim rngOutPut As Range'fyll ut områdeneSett rngInput = Range ("E6: E10")Sett rngOutPut = Range ("F6: F10")'ring funksjonen fra tilleggsprogrammetApplication.Run "Moveavg", rngInput, rngOutPut ,, False, True, FalseSlutt Sub |
Hvis du ikke vil betale en kostnad, må du endre Application.Run -linjen til denne
1 | Application.Run "Moveavg", rngInput, rngOutPut ,, False, False, False |