Jump to content

Calcular el bruto a partir del neto


Antoni

Recommended Posts

Posted

Hola:

Todavía sigue siendo bastante común el pactar los salarios netos en lugar de los brutos.

Luego viene el problema de calcular un bruto al que quitándole los descuentos nos de ese salario neto.

Eso, que a priori parece sencillo, en la práctica, no lo es tanto si lo hacemos de forma manual.

En el adjunto encontrareis una hoja con salarios netos y sus porcentajes de descuento por Seguridad Social e IRPF, también encontrareis dos botones, uno a modo de calculadora, y otro que procesa la hoja y obtiene las columnas sombreadas en rojo.

Saludos.

CalcularBruto.xls

Posted

Buen día, campeón de Macros!

No me dirás que esto es difícil: Siendo r el % de la SS y R el % de IRPF

BRUTO = 100*NETO/(100-(r+R))

Un abrazo

Posted

Hola Fleming:

Ya decía yo que se me olvidaba algo, falta el prorrateo de pagas extras.

No veo tan claro que pueda hacerse con una sola fórmula, pero igual si, no se.

Saludos.

PD. Lo subo en cuanto lo arregle

Posted

Macro, no tienes agallas a conseguir que, según el salario bruto del trabajador y a sus condiciones familiares e hipotecarias, se calcule automáticamente el tanto por ciento de IRPF.

(y ya de paso, lo utilizo yo.)

Posted

Sergio:

No soy un pez, por eso, no tengo agallas pero, hue.. no me faltan, jajaja.

Desconozco el procedimiento de cálculo del IRPF, pero lo buscaré y cuando lo tenga, lo vuelvo a subir.

Saludos

Posted

Ya estoy de nuevo por aquí y con las agallas completas y en su sitio.

Os dejo una co-producción entre www.irpf.eu y un servidor.

Yo he añadido el formulario y el cálculo del bruto a partir del neto aprovechando sus cálculos.

Que lo disfruteis con salud y que el neto os salga lo mas alto posible.

Saludos.

PD: ¡¡ Fleming, a ver si lo haces con una fórmula !! ... jejeje,... que malo soy.....

Los datos en las hojas están protegidos por un label transparente para evitar manipulaciones incorrectas involuntarias

Bruto -vs- Neto.xls

  • 3 years later...

Archived

This topic is now archived and is closed to further replies.

  • 109 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR
  • Files

  • Download Statistics

    • Files
      187
    • Comments
      97
    • Reviews
      28

    More information about "Un juego del Rabino en Excel"
    Latest File
    By pegones1

    1    1

  • Crear macros Excel

  • Posts

    • Hola, primero indicar que soy un novato y estoy aprendiendo con Excel. Tengo un formulario para añadir filas a una tabla llamada "Clientes". Me ocurre una cosa curiosa y es que aparentemente la macro ha funcionado y funciona bien salvo que ahora, cuando se ejecuta la macro, al añadir la última fila a la tabla, me da el siguiente error a pesar de no estar ninguna hoja protegida: Cuando se ejecuta la macro sale este error y se para en la línea: "Set Nuevafila2 = Tabla.ListRows.Add" llegando a añadir la última línea a la tabla. Cuando se ejecuta la macro sale este error y se para en la línea: "Set Nuevafila2 = Tabla.ListRows.Add" llegando a añadir la última línea a la tabla. Si vuelvo a ejecutar la macro, ya si me añade bien la siguiente fila. Y ya no da más el error. Puedo seguir ejecutando la macro añadiendo filas sin problema. Como he dicho, no hay ninguna hoja protegida, ni ningún formato condicional. Por más que reviso y busco en Internet no encuentro la solución. En el resto de formularios que tengo en el mismo libro para añadir registros en otras tablas, también ocurre lo mismo. Agradecería ayuda.
    • En lo que usted sube el archivo en base a lo que menciona esta podría ser una idea: Suponiendo que la ruta esta en B1 Public Sub Listaynombra_Manual() Dim ruta As String ' Obtiene la ruta de la celda B1 ruta = ActiveSheet.Range("B1").Value ' Verifica si la ruta no está vacía If ruta <> "" Then ' Llama a la función List_Fols_Files con la ruta obtenida List_Fols_Files ruta Else MsgBox "La celda B1 está vacía. Por favor, ingresa una ruta válida.", vbExclamation End If End Sub Es importante resaltar que si la ruta es válida pero la carpeta no existe tendrá un error, en ese supuesto caso para evitar que la macro falle, puede agregar una verificación adicional para asegurar que la carpeta existe antes de llamar a la función. Puede hacer eso utilizando la función Dir en VBA, que verifica la existencia del elemento. También algo tan sencillo como escribir en la celdas de manera nvertidas las diagonales // puede causar error. Saludos cordiales a ambos.
    • Hola buenas tardes: Por favo me pueden ayudar con los iguiente: tengo una macro que me ayuda a listar carpetas y nombre de archivos. (es una funcion) el cual llamo desde una SUb, este funciona bien, el problema es que debo poner la ruta de manera manual: Public Sub Listaynombra_Manual() With ActiveSheet List_Fols_Files "C:\Users\CARPETA\"   esta es la parte que debo cambiar cada que llamano la funcion (List_Fols_Files) End With End Sub Ay manera de que la ruta sea tomada de una celda de la misma hoja. Trate de poner algo asi: List_Folders_and_Files Range("B1").Value en esa celda esta la ruta donde debe extraer la informacion que requiero. gracias Mariano  
    • Hola JSDJSD: Lo que necesitaba. muchisimas gracias. ha quedado perfecto mi archivo. Saludos Mariano
  • Recently Browsing

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

Privacy Policy