Bloquear solo celdas con datos
En una Planilla excel compartida por varios usuarios se deben ingresar nombres y necesito que posterior a esto se bloquee solo la celda con datos y no pueda ser modificada por otra persona, con el fin de ser llenada por cada uno sin alterar los datos ya ingresados y obtener una lista final con la información entregada por cada uno.
Espero haber sido claro con la explicación de mi problema y obtener ayuda para la solución.
1 respuesta
Pon la siguiente macro en los eventos de ThisWorkbook. Esto hará que cuando cierren el libro, bloquee las celdas con datos y guardará el archivo. Es decir, el usuario captura, guarda y cierra, al momento de cerrar la macro se activará, bloqueará las celdas, guardará el archivo y lo cerrará.
Private Sub CommandButton1_Click()
'Por.Dante Amor
If ListBox1.ListCount = 0 Then
MsgBox "No hay registros en el listbox"
Exit Sub
End If
'
Set h = Sheets("Hoja3")
For i = 0 To ListBox1.ListCount - 1
nombre = ListBox1.List(i, 0)
monto = ListBox1.List(i, 1)
Set b = h.Columns("A").Find(nombre, lookat:=xlWhole)
If Not b Is Nothing Then
h.Cells(b.Row, "B") = monto
End If
Next
MsgBox "Se acutalizaron los montos"
End SubInstrucciones para poner la macro en los eventos ThisWorkbook
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a ThisWorkbook
- En el panel del lado derecho copia la macro
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
Cambia en la macro "Hoja3" por el nombre de la hoja que deseas proteger.
Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
