Macro Excel ejemplo: calcular descuentos




Recientemente me encontre en Yahoo respuestas con un usuario Choi Ji Woo que preguntaba sobre una macro excel ejemplo calcular Descuentos

Para responder a su pregunta me di a la tarea de construir una macro que se apegará a sus necesidades, para ello realicé los siguientes pasos

  1. Abrir Microsoft Excel 2007
  2. Activé la ficha de programador: es importante decirles que por defecto la pestaña de programador no aparece entre las opciones comunes de excel y que para quien necesite activarla debe seguir estos sencillos pasos.
    1.  vaya al menu principal de excel (Ese que parece bola de cristal en la esquina superior izquierda de la ventana principal de Excel)
    2. luego de clic sobre el botón opciones de Excel.  Ahi activen la casilla de Mostrar ficha de programador

3. Ahora ya con la pestaña de programador activa podemos ir a la opcion Macros y dar clic en ella para que se muestre la siguiente ventana

 

a. Una vez hecho eso escibirmos un nombre al azar, realmente no importa el nombre asignado para los fines de este tutorial.

b. Y después damos clic en el botón crear

Lo anterior va a abrir un editor de Visual Basic con algo de código en el archivo declarando una subrutina con el nombre de asignado por nosotros a la nueva macro.

Nota.- Todo ese código no va a ser útil para nosotros asi que lo borramos y dejamos toda la hoja en blanco.

Ahora el momento de programar nuestra función ha llegado asi que comencemos

Tenemos que desarrollar una función que reciba el monto total del consumo del cliente y regrese el monto con descuento, para ello diseñé el siguiente código

 

Public Function CalcularDesc(monto As Double) As Double
Dim descuento As Double
If monto = 30 Then
descuento = 10
ElseIf monto > 30 And monto 60 And monto 100 Then
descuento = 30
End If
CalcularDesc = monto - (monto * descuento / 100)
End Function

Por ultimo pero no menos importante dar clic en el botón de guardar y almacenar el libro de excel con el tipo de “Libro de Excel habilitado para Macros” recuerden que si lo guardan en el formato tradicional la macro no podrá ejecutarse correctamente

Ahora bien para probar nuestra funcion personalizada vayan a una hoja de excel y escriban en una celda un monto de consumo (el que quieran 10, 100 o 23 pesos) y en la otra la función que acabamos de programar asi:


=CalcularDesc(A1)

Donde A1 es la celda que contiene el consumo

 

Quedando algo como esto

Listo hemos terminado

Si necesitas el archivo de excel con el ejemplo lo dejo en el siguiente Link

EjemploMacroSimple

 

Solo me resta recordarte que si te ha servido esta información no olvides regarlanos un  Like en Facebook

 

 

One thought on “Macro Excel ejemplo: calcular descuentos

  1. hola y siquiera hacer una simulacion de un trabajor de empresa que por cada falta ya sean 6 se descuente 15 soles de su sueldo que es 600

Leave a Reply