This code allows you to create a simple pop-up box (UserForm or InputBox) to search for an account by code or name and automatically select it. It is ideal for quickly navigating massive ledgers. How to insert this code: to open the VBA Editor in Excel. Copy and paste the script below:
Elena stared at the spreadsheet on her screen. It was 11:47 PM. The Plan de Cuentas Contables de Venezuela —the official chart of accounts mandated by the SUNDDE and the FISCAL-i system—spread across 47 sheets like a drunk centipede.
She clicked a button labeled "CAFÉ" (because she always ran it while drinking cold coffee). plan de cuentas contables venezuela excel vba
El uso de VBA optimiza la inserción de cuentas, evita la duplicación de códigos y genera interfaces amigables (UserForms) para los usuarios que no dominan Excel avanzado. Código 1: Crear una Cuenta Nueva de Forma Segura
Private Sub Worksheet_Change(ByVal Target As Range) Dim Celda Codigo As Range Dim Fila As Long Dim Puntos As Integer Dim i As Integer ' Monitorear solo los cambios en la Columna A (Códigos), omitiendo el encabezado If Not Intersect(Target, Me.Range("A2:A10000")) Is Nothing Then Application.EnableEvents = False For Each Celda In Intersect(Target, Me.Range("A2:A10000")) Fila = Celda.Row ' Si se borra el código, limpiar la fila If Celda.Value = "" Then Me.Range("C" & Fila & ":E" & Fila).ClearContents Else ' Contar los puntos en el código para determinar el nivel jerárquico Puntos = 0 For i = 1 To Len(Celda.Value) If Mid(Celda.Value, i, 1) = "." Then Puntos = Puntos + 1 Next i ' Asignar Nivel (Puntos + 1) Me.Range("C" & Fila).Value = Puntos + 1 ' Determinar Naturaleza por el primer dígito (Estándar Venezolano) Select Case Left(Celda.Value, 1) Case "1", "5", "6" Me.Range("E" & Fila).Value = "Deudora" ' Activos, Costos, Gastos Case "2", "3", "4" Me.Range("E" & Fila).Value = "Acreedora" ' Pasivos, Patrimonio, Ingresos Case Else Me.Range("E" & Fila).Value = "Indefinida" End Select End If Next Celda Application.EnableEvents = True End If End Sub Use code with caution. Código 2: Consolidación Automática de Saldos This code allows you to create a simple
El plan de cuentas contables es el eje central de cualquier sistema financiero. En Venezuela, su diseño exige adaptarse a una realidad económica compleja, marcada por la inflación histórica y normativas fiscales estrictas dictadas por el SENIAT. Utilizar Excel junto con Visual Basic for Applications (VBA) permite transformar un listado estático en una herramienta automatizada, dinámica y eficiente.
BUSCARV o INDICE/COINCIDIR : Para traer el nombre de la cuenta automáticamente al ingresar el código en el Libro Diario. Copy and paste the script below: Elena stared
' If the bolívar dies, uncomment Sub ReindexInCrypto()