Desbloquear celdas en excel usando código vba

De antemano gracias a todos por las magnificas respuestas que dais y por el interés que ponéis por solucionar las dudas a otros.
Expongo mi problema: tengo una hoja excel con todas las celdas bloqueadas, mi intención es que cumpliendo una condición en A2 (que esta celda contenga "ENTRADA") se desbloqueen las celdas B2 y C2 para poder rellenar información en estas, y una vez rellenadas que se vuelvan a bloquear al pasar a la siguiente fila(este proceso tendrá que hacerse n veces ya que es para rellenar una ficha). Todo esto necesito hacerlo desarrollándolo con vba
Respuesta
1
Te dejo un código para la primera fila ya que no sémas datos de tu aplicación (cuantos datos debes introducir, ni cuantas veces, etc):
Sub protec()
Range("A2").Select
'Hace diferencia entre mayusculas y minusculas
If ActiveCell.Value = "ENTRADA" Then
Range("B2:C2").Select
Selection.Locked = False
Selection.FormulaHidden = False
dato1 = InputBox("Introduzca el dato 1", "dato1")
dato2 = InputBox("Introduzca el dato 2", "dato2")
Range("B2").Select
ActiveCell.FormulaR1C1 = dato1
Range("C2").Select
ActiveCell.FormulaR1C1 = dato2
Range("B2:C2").Select
Selection.Locked = True
Selection.FormulaHidden = True
GoTo cont
Else
Exit Sub
End If
cont:
End Sub
Pruébalo y ya me comentarás.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro para bloquear celdas escritas en Excel

Tengo la siguiente macro, pero yo quiero que solo se aplique a la Hoja1. ¿Es posible? Private Sub Workbook_BeforePrint(Cancel As Boolean) 'Proteger celdas con información 'Por.Dam Application.ScreenUpdating = False ActiveSheet.Unprotect...
2 respuestas

Bloquear celdas con parámetro de ingreso

Tengo un archivo en excel en el cual necesito bloquear unas celdas especificas de aceurdo a un parámetro ingresado, por ejemplo si la celda B5 es igual a Directo la celda B4 debe bloquearse automáticamente, si la celda B5 es igual a Indirecto, la...
1 respuesta

Macro condicional

Necesito ayuda para generar una macro que actúe al registrarse la fecha en una celda, y en función del valor de esta celda, otro rango de celdas se bloquee.
1 respuesta

Bloquear una casilla o no dependiendo del valor de otr

Tengo que proteger contra escritura una casilla en función del valor de otra, por ejemplo si mi casilla A1 vale "dital" la casilla B1 debe bloquarse contra escritura. Sin embargo si mi casilla A1 vale Analógico B2 debe estar sin bloquear y en ella yo...
1 respuesta

Macro para mostrar valores de una variable en Msgbox

Experto recurro a ti para solicitar de tu valiosa ayuda en el siguiente problema, resulta que yo tengo un código el cual me ayuda para de una serie ordenada avisarme cuáles folios consecutivos son los que me faltan en esa serie, así que cuando...
1 respuesta

Macro para bajar renglones

Me podrías ayudar con una macro que realize la siguiente función: Tengo un useform que pone datos en la celdas, y le hice un botón de aceptar, lo que quiero que haga ese botón es que me pocisione en la siguiente celda, por ejemplo: Escribo datos en...
2 respuestas

Usar userform para introducir información

Tengo creada una base de datos y para añadir registro he utilizado un userform de maner que se rellenan tres campos y al dar a un botón dentro del userform estos datos se quedan validados. El problema que tengo es que siempre se registran en la...
4 respuestas

"VLOOKUP" la segunda y la tercera coincidencia

Buscando un dato con "VLOOKUP" me da la primera coincidencia pero tiene 3 coincidencias como pedir la segunda y la tercera
1 respuesta