Bloquear la celda de la columna B

Explico lo que necesito, voy a capturar un dato en la columna A y quiero que en la columna B en la misma fila me ponga la fecha automáticamente y que además me bloqueé la celda A y B para que ese dato y esa fecha no se puedan modificar.

1 Respuesta

Respuesta
1

Para que una celda varias celdas se bloqueen, primero tienes que desbloquear todas las celdas y después tienes que proteger tu hoja.

En la macro puse el password de la hoja "abc", cámbialo por el que desees.

Te anexo la macro que deberás poner en los eventos de tu hoja.

Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
    If Not Intersect(Target, Columns("A")) Is Nothing Then
        ActiveSheet.Unprotect "abc"
        For Each c In Target
            Cells(c.Row, "B") = Date
            Cells(c.Row, "A").Locked = True
            Cells(c.Row, "B").Locked = True
        Next
        ActiveSheet.Protect "abc"
    End If
End Sub

Sigue las Instrucciones para poner la macro en los eventos de worksheet

  1. Abre tu libro de excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
  4. Del lado derecho copia la macro

Saludos. Dante Amor

Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas