¡Es impresionante! Son 100 GB gratis para respaldos y obtenemos 3 GB extra si usas mi invitación

100GB Free Cloud Backup Degoo Degoo Backup AB - Cloud (12,509) Play Store Install Degoo: 100 GB free secure cloud backup! Store your files for free with Degoo. Choose what you want to backup, like your photos or documents, and we store it all securely in Degoo's online cloud storage. Thanks to advanced encryption algorithms your backed up files are securely stored in the cloud and are always protected...

Ejercicio de VBA Excel

Antes que nada, desde el editor de VBA en Excel abra un modulo de clase al cual le pondrá el nombre "Persona"


Public nombre As String
Public cargo As String
Public fechaIng As Date
' estas variables son utilizadas para el calculo del IVA y del total a pagar
Public importeVta As Double
Public porcentajeIVA As Double



' lo que permite esta funcion es buscar y desplazarce a la siguiente celda vacía
' esto es lo que se ocupara en el "Módulo 1" para cuando estemos ingresando los datos

Public Function nuevoRegistro()
    Range("A1").Select
   
        Do While ActiveCell <> Empty
            ActiveCell.Offset(1, 0).Select
        Loop
               
End Function

' esta funcion es para calcular el importe del impuesto a pagar

Public Function calculoIVA()

    calculoIVA = (importeVta * porcentajeIVA) / 100

End Function


'esta funcion es para calcular el total a pagar, osea el total de la venta mas el impuesto

Public Function totalPagar()

    totalPagar = importeVta + calculoIVA


End Function

_______________________________________________________________________________

Posteriormente cree propiamente un modulo al cual pondrá el nombre de Módulo 1

Option Explicit

Sub RegistroEmpleados()

    ' esto es para ingresar los empleados

    Dim Empleado As New Persona

    

        With Empleado

            .nombre = InputBox("Nombre:")

            .cargo = InputBox("Cargo:")

            .fechaIng = InputBox("Fecha Ingreso:")

            

            ' este paso de ".nuevoRegistro" es importante, ya que es el que permite buscar las celdas

            ' vacias a las cuales se les agregará el nuevo registro

            ' esta funcion es la que creamos en el módulo de clase nombrado "Empleados"

            .nuevoRegistro

            

                ' esta parte permite buscar la columna vacia donde se guardara la informacion

                ActiveCell.Offset(0, 0) = .nombre

                ActiveCell.Offset(0, 1) = .cargo

                ActiveCell.Offset(0, 2) = .fechaIng

                

        End With

                

End Sub

' esta parte es para facturar e ingresar toda la informacion de la factura

Sub Factura()

    Dim cliente As New Persona

    

    With cliente

    

        .fechaIng = Date

        .nombre = InputBox("Nombre del cliente: ")

        .importeVta = InputBox("Monto de la venta: ")

        .porcentajeIVA = InputBox("% IVA")

        .nuevoRegistro

        

            ActiveCell.Offset(0, 0) = .fechaIng

            ActiveCell.Offset(0, 1) = .nombre

            ActiveCell.Offset(0, 2) = .importeVta

            ActiveCell.Offset(0, 3) = .calculoIVA

            ActiveCell.Offset(0, 4) = .totalPagar

            

    End With

    

End Sub

tabla de retencion de renta

Si su negocio es un restaurante ubicado en El Salvador entonces lea lo siguiente

Con base a la LEY REGULADORA DE LA PRODUCCIÓN Y COMERCIALIZACIÓN DEL ALCOHOL Y DE LAS BEBIDAS ALCOHÓLICAS, en el articulo 42-C, los comercializadores al detalle de bebidas alcoholicas deben de pagar impuesto AdValorem segun se detalla:

• cuando vendan bebidas alcoholicas al puble a un precio superior al sugerido segun la etiqueta o envase de la bebida
• deberan presentar declaracion advalorem por el diferencial de precio en exceso dentro de los primero 10 dias hábiles del siguiente mes de la venta realizada
• tambien se pagará impuesto advalorem por aquellos inventarios retirados cuya salida de inventario no haya sido por caso fortuito o fuerza mayor o a causas inherentes a las operaciones normales de la empresa

Por lo tanto:

• las empresas que comercializan bebidas alcoholicas a un precio mayor al sugerido deben de declaran y pagar el impuesto sobre el exceso en precios
• las empresas que comercializan bebidas alcoholicas deben de llevar un control mensual de sus inventarios de bebidas alcoholicas para determinar dicho impuesto
• las empresas que comercializan bebidas alcoholicas deben de dejar en claro y que no quepa a duda el precio de venta de las bebidas alcoholicas, osea dejarlo claro en la factura de venta (no como comunmente se deja con la leyenda "por consumo")
• las empresas que comercializan bebidas alcoholicas deben de declarar dichas ventas en el formulario F-06 dentro de los 10 dias habiles del siguiente mes, osea que deben ir junto con las declaraciones de IVA y Pago a Cuenta

Guía práctica de NIIF - CINIIF 18 Ejemplos de Transferencias de Activos procedentes de Clientes

Guía práctica de NIIF - CINIIF 18 Ejemplos de Transferencias de Activos procedentes de Clientes https://www.consultasifrs.com/novedades/e19347e1c3ca0c0b97de5fb3b690855a/Guia-practica-de-NIIF---CINIIF-18-Ejemplos-de-Transferencias-de-Activos-procedentes-de-Clientes-

Asamblea aprobó la Ley de Defensa Comercial | ElSalvador

Asamblea aprobó la Ley de Defensa Comercial | ElSalvador

Anuncian prorroga para que empresas cumplan requisitos de la Ley de Lavado de Dinero | ElSalvador

Anuncian prorroga para que empresas cumplan requisitos de la Ley de Lavado de Dinero | ElSalvador

Tabla para el cálculo del aguinaldo

IASB publica el nuevo libro de NIIF para las PYMES

IASB publica el nuevo libro de NIIF para las PYMES https://www.consultasifrs.com/novedades/e58cc5ca94270acaceed13bc82dfedf7/IASB-publica-el-nuevo-libro-de-NIIF-para-las-PYMES

Reformar al Codigo de Trabajo para calcular los Aguinaldos

REFÓRMASE EL CÓDIGO DE TRABAJO. — Asamblea Legislativa