Come bloccare e sbloccare celle specifiche con una casella di controllo in Excel?

Questo articolo parla dell'uso di una casella di controllo per bloccare e sbloccare un intervallo di celle specifiche in Excel.

Blocca e sblocca celle specifiche con una casella di controllo utilizzando il codice VBA

Blocca e sblocca celle specifiche con una casella di controllo utilizzando il codice VBA

Lo script VBA sottostante può aiutarti a sbloccare o bloccare un intervallo di celle specifiche quando si seleziona o deseleziona una casella di controllo nel foglio di lavoro. Procedi come segue.

1. Prima di tutto, devi assegnare un nome all'intervallo di celle che desideri bloccare e sbloccare con una casella di controllo.

Qui seleziono l'intervallo A1:A14, digito un nome LockRng nella casella Nome e poi premo il tasto Invio. Vedi screenshot:

2. Nel foglio di lavoro contenente la casella di controllo che utilizzerai per bloccare e sbloccare le celle, fai clic destro sulla Scheda del Foglio e poi clicca su Visualizza Codice dal menu contestuale.

Nota: La casella di controllo deve essere una casella di controllo ActiveX durante l'inserimento.

3. Nella finestra Microsoft Visual Basic for Applications che appare, copia e incolla il seguente codice VBA nella finestra del Codice.

Codice VBA: Blocca o sblocca un intervallo di celle specifiche con una casella di controllo

Private Sub CheckBox1_Click()
    Range("LockRng").Select
    On Error Resume Next
    If CheckBox1.Value = True Then
        Selection.Locked = False
        MsgBox "Range cells " & Selection.Address & " has been unlocked", vbInformation, "Kutools for Excel"
    Else
        Selection.Locked = True
        MsgBox "Range cells " & Selection.Address & " has been locked", vbInformation, "Kutools for Excel"
    End If
End Sub

Nota: Nel codice, Checkbox1 è il nome della casella di controllo, LockRng è il nome dell'intervallo di celle specificato. Puoi modificarli come necessario.

4. Premi contemporaneamente i tasti Alt + Q per chiudere la finestra Microsoft Visual Basic for Applications.

Ora puoi testare il codice. Quando deselezioni la casella di controllo, apparirà una finestra di dialogo di Kutools per Excel per informarti che l'intervallo specificato è stato bloccato; fai clic sul pulsante OK.

Mentre selezioni la casella di controllo, tutte le celle nell'intervallo specificato verranno sbloccate e vedrai una finestra di dialogo di Kutools per Excel come mostrato nello screenshot a destra.

Articoli correlati:

• Come filtrare i dati in base alla casella di controllo in Excel?
• Come nascondere la casella di controllo quando la riga è nascosta in Excel?
• Come creare un elenco a discesa con più caselle di controllo in Excel?
• Come evidenziare la cella o la riga con una casella di controllo in Excel?