VBA ( Visual Basic for Applications ) inkluderer muligheten til å skrive instruksjoner skaper en makro som vil etterligne bruke en kalkulator for å skrive inn en rekke tall og deretter beregne gjennomsnittet. Koden er bare 13 linjer lang. Det kan være nyttig i noen av Microsoft Office-programmene uten en innebygd kalkulator . Siden Excel inneholder en gjennomsnittlig funksjon, ville det ikke være noen grunn til å bruke denne makro i Excel. Men som i dette eksempelet , hvor makroen er bygget i Microsoft Word , kan det gjøre noe fornuftig. Instruksjoner
en

Åpne et Microsoft Office-program som støtter VBA ( Visual Basic for Applications ) . For dette eksempelet bruker Microsoft Word .
2

Klikk " Developer " etterfulgt av " Visual Basic ", som er notert på helt til venstre i en meny som vises i Developer gruppen . Dette åpner VBA redigering vinduet
3

Oppgi følgende kodelinjer nøyaktig slik de vises nedenfor : .

Gå AverageMyNumbers () Dim strData som stringDim i, sglNbr , sglSubT , sglAverage Som Singlei = 0Do inntil strData = "X" strData = InputBox ("Skriv inn tallene som skal i gjennomsnitt , en om gangen , trykke " Enter " for å fortsette til neste nummer . Tast inn en kapital X når du er ferdig . " ;) sglNbr = Val ( strData ) sglSubT = sglNbr + sglSubTi = i + ​​1LoopsglAverage = sglSubT /(i - 1 ) MsgBox ( " gjennomsnittet av disse tallene er " & sglAverage ) End Sub
4

Test nøyaktigheten av programmet ved å liste en rekke tall på papir , til sammen dem , og dividere med antall individuelle elementer . Trykk "F5 " for å kjøre makroen og beregne gjennomsnitt . Følg instruksjonene og gå inn i samme serie med tall , og endte med en kapital X. Hvis resultatene ikke samsvarer, sjekke nøyaktigheten av koden du skrev inn , sammenligne den til trinn 3. .
5

Klikk på " Makroer " i Word-dokumentet . Lagre makroen i " Normal.dotm " hvis du ønsker å bruke den i alle Word-dokumenter. Andre alternativer finnes for eksempel spare bare for bruk i det aktive dokumentet , lagre som en del av en bestemt mal , eller lagre i alle aktive maler og dokumenter .