Saltar al contenido

Bloquear celdas en Excel al ir rellenandolas

publicado

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

Gracias

Featured Replies

publicado

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.

publicado
  • Autor

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

Gracias

  • 11 months later...
publicado

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!

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.