Día 9 – Ingresos y Egresos en Excel con Macro en Excel #Reto40Excel 2016

En este día del Reto40Excel hemos preparado un contenido referente a los ingresos y egresos en Excel a través de una Macro en Excel estas son unas salidas y entradas qué vamos a aprender a diligenciar directamente en hoja de cálculo y a través de una Macro en Excel esa información se va a llevar a otra hoja este es una plantilla sencilla básica pero muy útil cuando se trata de manejar la información y de una forma ordenada, por eso hemos decidido realizar este ejercicio práctico para que lo tomes como base y aprendas la implementación de macros para robustecerlo de acuerdo a tu conocimiento.

Los ingresos y los egresos en Excel se pueden manejar de diferente forma, hemos decidido en este día del Reto40Excel que se ingresen los siguientes campos:

– Concepto
– Valor
– MovimientoEspecialistas En Excel

Para resolver lo que se propone en este día a través de una Macro referente a los ingresos  y egresos en Excel hemos utilizado en la Macro la definición de variables como asignación de datos a esas variables y así mismo condiciones para determinar a qué tipo de movimiento corresponde si corresponde al movimiento ingreso se debe almacenar el valor o el dato en la columna ingreso, de lo contrario debe ser un egreso, también en este ejercicio aplicamos la suma de todos los ingresos menos la suma de todos los ingresos y eso nos da una utilidad Espero que este recurso sea de tu agrado y que te aporte valor como siempre pretendemos en lo que compartimos.

A continuación se especifican las herramientas utilizadas en el material de este día:

– Ingresos y Egresos en Excel
– Ingresos en Excel
– Egresos en Excel
– Declaración de variables en VBA
– Asignación a una variable en VBA
– Capturar la última fila con datos en VBA
– Msgbox en VBA

Para no perderte nada de lo que compartimos en las redes sociales, puedes seguirnos a través de los siguientes medios:

Youtube: https://goo.gl/FrswaC
Facebook: https://goo.gl/W5dIsa
Twitter: https://twitter.com/ee_excel
Instagram: https://goo.gl/xadGB5
Linkedin: https://goo.gl/Os1boH

A continuación el material de hoy:

Click >> Aquí << para descargar ejercicio del día

Comunidad Triple EEE

1) Recibe estos vídeos GRATIS >> https://goo.gl/FrswaC

2) Suscríbete a este curso gratuito para aumentar tu productividad en Excel un 80% y obtén 4 regalos adicionales al suscribirte a este curso: http://goo.gl/zNqh0o

Artículos anteriores:

  1. Día 8 – Comodines en Excel #Reto40Excel 2016
  2. Día 7 – Macro en Excel para extraer datos con condiciones #Reto40Excel 2016
  3. Día 6 – Macro en Excel para abrir archivos externos con condición IF – Reto40Excel v.2016
  4. Día 5 – Sumar últimas celdas en Excel – Reto40Excel v.2016
  5. Día 4 – Formato condicional para mostrar repeticiones a partir de una variable – Reto40Excel v.2016
  6. Día 3 – Ordenar con letras y números en Excel – Reto40Excel v.2016
  7. Día 2 – Definir cálculo con Función SI y lista desplegable en Excel – Reto40Excel v.2016
  8. Día 1 – Validación de datos en Excel para limitar cantidad y contenido en una celda – Reto40Excel v.2016
  9. Lanzamiento de Reto40Excel v.2016
  10. Función SUBTOTALES en Excel
  11. Sumar en Excel con condiciones – Parte 3 de 4 – Excluyendo mes
  12. Sumar en Excel con condiciones – Parte 2 de 4 por período
  13. Sumar en Excel con condiciones – Parte 1 de 4 Listas desplegables

10 comentarios en “Día 9 – Ingresos y Egresos en Excel con Macro en Excel #Reto40Excel 2016”

  1. Pingback: Día 10 - Insertar Comentarios en Excel con macros en Excel #Reto40Excel 2016 - Especialistas En Excel

  2. Saludos Alfonso,

    Un aporte para este reto 9. Cumplido:
    Sub extraerDatosEjercicio()
    Dim ultFilaDatos As Long
    Dim ultFilaEmpleados As Long

    Dim nombreCompleto As String
    Dim fechaIngreso As Date
    Dim salario As Double
    Dim comision As Double
    Dim cont As Long

    ultFilaDatos = Sheets(“Ejercicio”).Range(“C” & Rows.Count).End(xlUp).Row

    For cont = 8 To ultFilaDatos
    nombreCompleto = Sheets(“Ejercicio”).Cells(cont, 3)
    fechaIngreso = Sheets(“Ejercicio”).Cells(cont, 4)
    salario = Sheets(“Ejercicio”).Cells(cont, 5)
    comision = Sheets(“Ejercicio”).Cells(cont, 6)

    If comision > 100 And Year(fechaIngreso) = 2014 And Month(fechaIngreso) >= 1 And Month(fechaIngreso) <= 4 Then
    ultFilaEmpleados = Sheets("IngresosEjercicio").Range("C" & Rows.Count).End(xlUp).Row
    Sheets("IngresosEjercicio").Cells(ultFilaEmpleados + 1, 3) = nombreCompleto
    Sheets("IngresosEjercicio").Cells(ultFilaEmpleados + 1, 4) = fechaIngreso
    Sheets("IngresosEjercicio").Cells(ultFilaEmpleados + 1, 5) = salario
    Sheets("IngresosEjercicio").Cells(ultFilaEmpleados + 1, 6) = comision
    End If
    Next cont

    End Sub

    Gracias por este interesante reto.

  3. Pingback: Fórmulas Matriciales en Excel con condiciones Nivel Avanzado

  4. Pingback: Lista desplegable en Excel 2016 sin Duplicados

  5. Pingback: Consultar Access desde Excel varias condiciones, limpiando datos

  6. Pingback: Consultar Tabla Access desde Macro Excel VBA

  7. Pingback: Formularios en Excel VBA: Eliminar en una base de datos en Excel

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *