** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - cuenta en contabilidad
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradocuenta en contabilidad

 Responder Responder
Autor
Mensaje
valencianoblaugrana Ver desplegable
Asiduo
Asiduo


Unido: 20/Junio/2014
Localización: Alicante
Estado: Sin conexión
Puntos: 493
Enlace directo a este mensaje Tema: cuenta en contabilidad
    Enviado: 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
Arriba
01loko Ver desplegable
Colaborador
Colaborador


Unido: 17/Agosto/2017
Localización: Santander
Estado: Sin conexión
Puntos: 807
Enlace directo a este mensaje Enviado: 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.
Arriba
mounir Ver desplegable
Colaborador
Colaborador


Unido: 09/Febrero/2009
Localización: Asturias-España
Estado: Sin conexión
Puntos: 6479
Enlace directo a este mensaje Enviado: 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.
Arriba
valencianoblaugrana Ver desplegable
Asiduo
Asiduo


Unido: 20/Junio/2014
Localización: Alicante
Estado: Sin conexión
Puntos: 493
Enlace directo a este mensaje Enviado: 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.
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable