Foros del Web » Soporte técnico » Ofimática »

correlativos de numeros

Estas en el tema de correlativos de numeros en el foro de Ofimática en Foros del Web. hola alguien puede ayudarme tengo una hoja de excel donde tengo un documeto de envio y cada vez que hago uno tengo q digitar el ...
  #1 (permalink)  
Antiguo 20/06/2007, 19:00
 
Fecha de Ingreso: mayo-2007
Mensajes: 1
Antigüedad: 12 años, 3 meses
Puntos: 0
correlativos de numeros

hola alguien puede ayudarme tengo una hoja de excel donde tengo un documeto de envio y cada vez que hago uno tengo q digitar el numero q continua necesito una formula ya sea con macro o sin macro para q automaticamente me tire le correlativo del # si alguien puede ayudarme gracias
  #2 (permalink)  
Antiguo 21/06/2007, 00:59
Avatar de 3pies
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Desde una destilería
Mensajes: 2.590
Antigüedad: 15 años, 9 meses
Puntos: 144
Re: correlativos de numeros

Hola Jaime. Bienvenido a foros del web...

Imagina que en la celda B10 tienes el importe de una factura (la base imponible de la misma, o lo que quieras). Supongamos que cada vez que cambia el importe, quieres que se genere un nº de factura correlativo, y que el número de factura está en la celda A5 (que es la que cambiará, al cambiar la celda B10).

Tan solo tienes que colocar este código en la hoja de cálculo donde quieras incrementar 1 el valor de la celda en cuestión (ya sabes, Alt + F11, para entrar en modo VBA):

Código:
'Este procedimiento se ejecutará cada vez que cambiemos
'algo de la hoja donde tengamos este código
Private Sub Worksheet_Change(ByVal Target As Range)
    'y más concretamente, se ejecutará el código SOLO
    'Y EXCLUSIVAMENTE, cuando cambie el valor de la celda B10
    If Target.Cells = Range("B10") Then
        '¿qué haremos llegado el caso?
        'pues coger el valor de A5, sumarle 1,
        'y volver a poner ese valor en A5
        Range("A5") = Range("A5") + 1
    End If
End Sub
Salu2
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 15:36.