Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Ejemplo de uso de For aplicado al calculo del promedio de ventas

| 3 comentarios

La iteración For ..Next es una instrucción en la que podemos ejecutar un bucle un determinado número de veces conociéndolo previamente.

La sintaxis de la sentencia For..Next

For contador= empezar to finalizar [step incremento (Opcional)]

instrucción 1

instrucción 2

......

instrucción n

next (contador)

Presentaremos a continuación un ejemplo de como calcular el promedio de ventas mensuales .

Datos:

Columna B

Desde la Fila 02 a la 13

Enero: $ 30 000

Febrero:$ 30 000

Marzo:$ 30 00

Abril:$ 25 000

Mayo:$ 20 000

Junio:$ 15 000

Julio:$ 10 000

Agosto:$ 8 000

Septiembre:$ 13 000

Octubre:$ 19 000

Noviembre:$ 24 000

Diciembre:$ 28 000

Ahora debemos de entrar a la pestaña del programador y darle clic a la opción Visual Basic para poder programar las instrucciones.

A continuación se presenta las instrucciones para calcular el promedio de ventas y muestre el resultado en un mensaje

Sub calcularpromedio()
Dim suma_ventas As Long
Dim ventas As Integer
Dim fila As Integer
Dim fin As Byte
Dim num_meses As Byte
Dim inicio As Byte
Dim calcularpromedio As Single
inicio = 2
num_meses = 12
suma_ventas = 0
fin = inicio + num_meses - 1
For fila = inicio To fin
ventas = Range("B" & fila)
suma_ventas = suma_ventas + ventas
Next
calcularpromedio = Round(suma_ventas / num_meses, 0)
MsgBox calcularpromedio
End Sub

Por ultimo dejo el Excel donde esta desarrollado el ejemplo

Ejemplo Promedio de ventas (VBA)

Elaborado por: Daniel Cazorla

3 comentarios

Deja una respuesta

Los campos requeridos estan marcados con *.