Cómo calcular promedios en VBA

Escrito por robert karr | Traducido por juliana star
  • Comparte
  • Twittea
  • Comparte
  • Pin
  • E-mail
Cómo calcular promedios en VBA
Cómo calcular promedios en VBA. (Stockbyte/Stockbyte/Getty Images)

VBA (Visual Basic para Aplicaciones) incluye la capacidad de escribir instrucciones para crear una macro que imite el uso de una calculadora para introducir una serie de números y luego calcular el promedio. El código solamente es de 13 líneas de longitud y puede ser útil en algunos de los programas de Microsoft Office que carecen de una calculadora integrada. Ya que Excel incluye una función de promedio, no habría razón por la que tuviera que usarse esta macro en Excel. Sin embargo, crear la macro en Microsoft Word puede tener más sentido, como en este ejemplo.

Nivel de dificultad:
Moderado

Otras personas están leyendo

Instrucciones

  1. 1

    Abre un programa de Microsoft Office compatible con VBA (Visual Basic para Aplicaciones). Para este ejemplo usa Microsoft Word.

  2. 2

    Haz clic en "Desarrollador" y luego en "Visual Basic", que se encuentra en el extremo izquierdo de un menú que aparece en el grupo "Desarrollador". Esto abre la ventana de edición de VBA.

  3. 3

    Escribe las siguientes líneas de código exactamente como aparecen a continuación:

    Sub AverageMyNumbers() Dim strData as string Dim i, sglNbr, sglSubT, sglAverage As Single i = 0 Do Until strData = "X" strData = InputBox("Enter the numbers to be averaged, one at a time, pressing 'Enter' to continue to the next number. Enter a capital X when done.") sglNbr = Val(strData) sglSubT = sglNbr + sglSubT i = i + 1 Loop sglAverage = sglSubT / (i - 1) MsgBox ("The average of these numbers is " & sglAverage) End Sub

  4. 4

    Prueba la exactitud del programa listando una serie de números en un papel, sumándolos y dividiendo el total entre el número de elementos individuales. Presiona "F5" para ejecutar la macro y calcular promedios. Sigue las instrucciones y escribe la misma serie de números, terminando con una X mayúscula. Si el resultado no coincide verifica la exactitud del código que escribiste comparándolo con el del Paso 3.

  5. 5

    Haz clic en "Macros" en el documento de Word. Guarda la macro en "normal.dotm” si quieres usarla en todos los documentos de Word. Existen otras opciones, como guardarla solamente para su uso en el documento activo, guardarla como parte de una plantilla específica o guardarla en todas las plantillas y documentos activos.

Consejos y advertencias

  • Debes guardar el documento como un Documento Compatible con Macros para poder usar esa función.
  • Ten cuidado con los programas que incluyan funciones Loop (ciclos). Si el usuario no escribe nada éste programa seguirá pidiendo más números hasta que se escriba una X mayúscula. El programa contará cada entrada en blanco como otra cifra del número total de entradas, arruinando el promedio. Incluso es posible entrar en un ciclo infinito si el usuario escribe el tipo incorrecto de información. En la vida real se añadiría código de captura de errores para advertir al usuario que cometió un error y para recuperarse del mismo.

No dejes de ver

Filtrar por:
  • Mostrar todos
  • Artículos
  • Galerías de fotos
  • Videos
Ordenar:
  • Más relevante
  • Más popular
  • Más reciente

No se encuentran artículos disponibles

No se encuentran slideshows disponibles

No se encuentran videos disponibles