Come calcolare le medie in VBA

VBA ( Visual Basic for Applications ) include la possibilità di scrivere le istruzioni creando una macro che imitare utilizzando una calcolatrice per inserire una serie di numeri e poi calcolare la media . Il codice è lungo solo 13 righe. Potrebbe essere utile in alcuni dei programmi di Microsoft Office senza una calcolatrice incorporata . Poiché Excel include una funzione di media , non ci sarebbe alcun motivo per utilizzare questa macro in Excel . Tuttavia, come in questo esempio , in cui la macro è costruita in Microsoft Word , esso può avere un senso. Istruzioni
1

Aprire un programma di Microsoft Office che supporta VBA ( Visual Basic for Applications ) . Per questo esempio , utilizzare Microsoft Word .
2

Clicca "Sviluppatore " seguito da " Visual Basic ", che è quotata alla sinistra di un menu che compare nel gruppo di sviluppatori . Si apre la finestra di modifica VBA
3

Inserire le seguenti righe di codice esattamente come appaiono qui di seguito : .

Sub AverageMyNumbers () Dim strData come stringDim i, sglNbr , sglSubT , sglAverage Come Singlei = 0Do Fino strData = "X " strData = InputBox ( " Inserire i numeri come media , uno alla volta , premendo il tasto ' Invio' per continuare al numero successivo . Inserisci un capitale X quando fatto . " ;) sglNbr = Val ( strData ) sglSubT = sglNbr + sglSubTi = i + 1LoopsglAverage = sglSubT /(i - 1) MsgBox ( " La media di questi numeri è " & sglAverage ) End Sub
4

testare l'accuratezza del programma elencando una serie di numeri su carta , per un totale di essi , e dividendo per il numero di singoli elementi . Premere il tasto " F5 " per eseguire la macro e calcolare le medie . Seguire le istruzioni e inserire la stessa serie di numeri , che termina con una X. capitali Se i risultati non corrispondono, verificare l'esattezza del codice inserito , confrontandolo al punto 3.
5

Click su "Macro" nel documento di Word . Salvare la macro in " normal.dotm " se si desidera utilizzarlo in tutti i documenti di Word. Esistono altre opzioni come il salvataggio solo per l'uso nel documento attivo , il risparmio come parte di un modello specifico , o il salvataggio in tutti i modelli attivi e documenti.