Skip to main content
plan de cuentas contables venezuela excel vba
Account

Plan De Cuentas Contables Venezuela Excel Vba » 【TRUSTED】

Sub BuscarCuenta() Dim criterio As String Dim fila As Long Dim ultimaFila As Long Dim hallado As Boolean criterio = InputBox("Ingrese el código o nombre de la cuenta:", "Buscador Contable") If criterio = "" Then Exit Sub ultimaFila = Sheets("PlanCuentas").Cells(Rows.Count, 1).End(xlUp).Row hallado = False For fila = 2 To ultimaFila If InStr(1, Sheets("PlanCuentas").Cells(fila, 1), criterio) > 0 Or _ InStr(1, LCase(Sheets("PlanCuentas").Cells(fila, 2)), LCase(criterio)) > 0 Then Sheets("PlanCuentas").Rows(fila).Select MsgBox "Cuenta encontrada: " & Cells(fila, 2), vbInformation hallado = True Exit For End If Next fila If Not hallado Then MsgBox "No se encontró la cuenta.", vbExclamation End Sub Use code with caution. 4. Validación de Niveles y Formato Automático

. Set up your columns starting at row 1 with the following structure: Código (Col A) Descripción de la Cuenta (Col B) Tipo de Cuenta (Col C) Nivel (Col D) Real / Balance ACTIVO CORRIENTE Real / Balance Efectivo y Equivalentes de Efectivo Real / Balance Caja Chica Real / Balance Banco Nacional (Banesco / BDV) Real / Balance Real / Balance PASIVO CORRIENTE Real / Balance Cuentas por Pagar Comerciales Real / Balance Retenciones por Pagar (ISLR / IVA) Real / Balance PATRIMONIO Real / Balance Capital Social Real / Balance Nominal / Resultados Ingresos por Ventas Nominal / Resultados Nominal / Resultados Gastos Administrativos Nominal / Resultados Sueldos y Salarios Nominal / Resultados 2. VBA Automation Code plan de cuentas contables venezuela excel vba

Sub CrearListaCuentas() Dim wsPlan As Worksheet, wsEntradas As Worksheet Dim ultFila As Long Set wsPlan = Sheets("PlanCuentas") Set wsEntradas = Sheets("Asientos") ultFila = wsPlan.Cells(Rows.Count, 1).End(xlUp).Row With wsEntradas.Range("A2:A1000").Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _ Formula1:="=" & wsPlan.Range("A2:A" & ultFila).Address(, , , True) End With Sub BuscarCuenta() Dim criterio As String Dim fila

' Step 3: Generate the Declaración Definitiva Call GenerateSUNDDEXML ' This part took 400 hours to debug MsgBox "Listo. El gobierno aceptará esto. Probablemente." Set up your columns starting at row 1

En Venezuela, las empresas deben cumplir con las normas y regulaciones contables establecidas por la Comisión Nacional de Valores (CNV) y el Ministerio de la Alimentación. Un plan de cuentas contables es un documento que establece la estructura y organización de las cuentas contables de una empresa, permitiendo un registro y presentación de la información financiera precisa y uniforme. En este informe, se presenta un plan de cuentas contables modelo para empresas en Venezuela, utilizando Excel y VBA.