Bloquear celdas en Excel al ir rellenandolas

[ednsb]

Hay alguna forma, tal vez formato condicional, que permita ir bloqueando las celdas en la medida en que estas son rellenadas con datos?

Gracias

[German]

Hola, pues que yo sepa no, ni tan siquiera con formato condicional, y no sé si con algún código VBA podría lograrse, pero en eso yo no puedo ayudarte, y creo deberías solicitar a los administradores que te lo cambien de subforo al de macros.... para que otros compañeros que sí puedan verlo y ayudarte.

Saludos, Germán.

[ednsb]

Comprendido. Espero que algún administrador migre este tema a otro foro para evitar duplicar el mensaje.

Gracias

[Principiante]

Hola ednsb,

Puedes intentar haciendo lo siguiente:

1. seleccionas el rango que deseas que se bloquee al ingresar información

2. le das clic derecho, formato de celdas y le deshabilitas la opción de bloqueo.

3. luego debes proteger la hoja.

Hecho esto, debes escribir directamente en la hoja el sgte codigo:

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("A7:E65536 ")) Is Nothing Then

Exit Sub

Else

If Target.Value <> "" Then

Target.Select

ActiveSheet.Unprotect "2013"

Selection.Locked = True

End If

ActiveSheet.Protect "2013", DrawingObjects:=True, Contents:=True, Scenarios:=True

ActiveSheet.EnableSelection = xlUnlockedCells

End If

End Sub

En la parte del codigo que dice: Target, Range("A7:E65536 " le debes poner el rango que habías seleccionado en el paso 1. y en la parte que dice "123" le pones la contraseña con la que bloqueaste tu hoja.

Ya te debe funcionar, intentalo!