Realizar macro para numero correlativo
Hola
tengo una hoja Excel bloqueada cada vez que inserto un dato para no poder modifiacar el registro.
Necesito que en la primera columna pueda insertar automáticamente (cada vez que ingreso un dato en la segunda columna) un número correlativo.
Por favor si me pudieran ayudar?
2 respuestas
Respuesta de Elsa Matilde
1
Respuesta de Dante Amor
1
Te anexo la macro actualizada
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Range("B:H")) Is Nothing Then
If Target.Row < 9 Then Exit Sub
ActiveSheet.Unprotect "123"
For Each c In Target
If c.Value <> "" Then
Cells(c.Row, "A") = c.Row - 8
Cells(c.Row, "A").Locked = True
c.Locked = True
End If
Next
ActiveSheet.Protect "123"
End If
End SubSaludos.Dante Amor