VBA (Visual Basic for Applications ), inclui a capacidade de escrever instruções , criando uma macro que irá imitar usando uma calculadora para introduzir uma série de números e , em seguida, calcular a média. O código é de apenas 13 linhas. Pode ser útil em alguns dos programas do Microsoft Office sem uma calculadora embutida . Desde Excel inclui uma função de média, não haveria razão para usar essa macro no Excel. No entanto, como neste exemplo, onde a macro é construído em Microsoft Word , pode fazer algum sentido. Instruções
1
Abra um programa do Microsoft Office que suporta VBA (Visual Basic for Applications ) . Para este exemplo , utilize o Microsoft Word.
2
Clique "Developer" , seguido de " Visual Basic ", que está listado no canto esquerdo de um menu que aparece no grupo desenvolvedor . Isto abre a janela de edição de VBA
3
Digite as seguintes linhas de código exatamente como eles aparecem abaixo : .
Sub AverageMyNumbers () Dim strData como stringDim i, sglNbr , sglSubT , sglAverage Como Singlei = 0do até strData = "X" strData = InputBox ("Digite os números para a média , um de cada vez , pressionando ' Enter' para continuar para o próximo número . Digite um capital X quando terminar. " ;) sglNbr = Val ( strData ) sglSubT = sglNbr + sglSubTi = i + = 1LoopsglAverage sglSubT /(i - 1) MsgBox (" A média desses números é" & sglAverage ) End Sub
4
testar a precisão do programa , listando uma série de números no papel, totalizando eles, e dividindo pelo número de itens individuais. Pressione " F5" para executar a macro e calcular médias. Siga as instruções e insira a mesma série de números , terminando com um capital de X. Se os resultados não corresponderem, verificar a exatidão do código digitado , comparando-a com a Etapa 3.
5
Click em "Macros" no documento do Word . Salve a macro no " normal.dotm " se você quiser usá-lo em todos os documentos do Word. Outras opções existem , tais como a poupança apenas para uso no documento ativo , salvando como parte de um modelo específico , ou salvar em todos os modelos e documentos ativos .
