Worksheet_Change, ingresar dato y que autoenumere

[juliocesar1]

Hola, al trabajar en hoja1 (Worksheet_Change) quisiera obtener la macro que si ingreso un dato en la columna A, se enumere de forma automática en la columna B en forma correlativa a partir del...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Guillermo Hm]

Buenas noches,

Se podria resolver de la siguiente forma:


On Error Resume Next
If Target.Column = 1 And Target.Row > 1 Then
Target.Offset(0, 1).Value = Target.Offset(-1, 1).Value + 1
Else
End If

 

[juliocesar1]

Si funciona, muchas gracias Guillermo Hm

 

[Héctor Miguel]

hola, a todos !

se entiende/asume/espera/... que nunca vas a eliminar una fila intermedia ya numerada
o... que sabes que hacer en ese caso ?

saludos,
hector.