Imprimir página | Cerrar ventana

cuenta en contabilidad

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=85083
Fecha de impresión: 16/Abril/2024 a las 09:20


Tema: cuenta en contabilidad
Publicado por: valencianoblaugrana
Asunto: cuenta en contabilidad
Fecha de publicación: 23/Marzo/2020 a las 11:08
Buenos días compañeros,

Me gustaría saber como puedo en contabilidad dar de alta un registro cuyo número de cuenta tenga 7 dígitos y que al introducir por ejemplo 4001, se convierta automáticamente en 4000001, tal y conforme pasa en Contaplus. Al introducir 4022 se convierta en 4000022.

Muchas gracias por vuestra ayuda

Saludos


Respuestas:
Publicado por: 01loko
Fecha de publicación: 23/Marzo/2020 a las 13:54
que yo sepa, en contabilidad las cuentas son de tres digitos, 430... clientes, 400 proveedores etc.

sabiendo eso, depende del tipo apunte que quieras introducir, puedes rellenar al principio con lo necesario o bien metiendo los tres primeros que el resto los considere cod. cliente o proveedor

quitas  3 numeros a la izquierda y el resto se lo asignas:
si escribo 43022
left(codigo_introducido,3) =cuenta contable= 430
right(codigo_introducido,len(codigo_introducido)-3) =codigo proveedor/cliente =22
7- len(codigo_introducido) = numero de ceros que te faltan
cuenta_contable + tantos 0 como te faltan + codigo cliente/proveedor





-------------
Recordar de que soy nuevo y estoy aprendiendo.

Publicado por: mounir
Fecha de publicación: 23/Marzo/2020 a las 14:08
Hola!

Supongo que quieres que ponga los res ceros tras el primero numero.
Date cuenta que los numeros que introduzces deben ser 4 digitos.

Así podría funcionar:-

=Izq([Tucampo];1) & "000" & Der([Tucampo];Longitud([Tucampo])-1)



-------------
Un Saludo.

Publicado por: valencianoblaugrana
Fecha de publicación: 23/Marzo/2020 a las 15:43
Muchísimas gracias Mounir, tema solucionado!!. Se puede cerrar el hilo.

Un saludo y fuerte abrazo a todos/as.


Imprimir página | Cerrar ventana