Come impedire la selezione di più fogli di lavoro in Excel?

Quando si selezionano accidentalmente più fogli di lavoro e si effettua una modifica, tutti i fogli selezionati verranno coperti con lo stesso contenuto. Qui vi presentiamo un metodo per impedire la selezione simultanea di più fogli di lavoro, evitando così che lo stesso contenuto appaia su questi fogli.

Impedire la selezione di più fogli di lavoro con il codice VBA

Impedire la selezione di più fogli di lavoro con il codice VBA

Eseguite i seguenti passaggi per impedire la selezione simultanea di più fogli di lavoro.

1. Nel foglio di lavoro che dovete modificare, fate clic con il tasto destro del mouse sulla scheda del foglio e selezionate Visualizza Codice dal menu contestuale.

2. Quindi copiate e incollate il seguente codice VBA nella finestra Codice della finestra Microsoft Visual Basic for Applications che si apre.

Codice VBA: Impedire la selezione di più fogli in Excel

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.ScreenUpdating = False
 On Error GoTo err_handler
    If ActiveWindow.SelectedSheets.Count > 1 Then
        If ActiveSheet Is Target.Parent Then
            Application.EnableEvents = False
            MsgBox "Please don't make changes with multiple sheets selected.", _
            vbInformation, "Kutools for Excel"
            Application.Undo
            ActiveSheet.Select
        End If
    End If

err_handler:
Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub

3. Premete quindi contemporaneamente i tasti Alt + Q per chiudere la finestra Microsoft Visual Basic for Applications.

4. Quando selezionate più fogli di lavoro insieme al foglio corrente, inserite il contenuto e premete il tasto Invio, vedrete una finestra di dialogo di Kutools per Excel come mostrato nello screenshot sottostante per avvisarvi della selezione di più fogli di lavoro. Cliccate sul pulsante OK.

Dopo aver cliccato sul pulsante OK, tutti i fogli selezionati verranno immediatamente separati.

Articoli correlati:

• Come eliminare tutti i fogli tranne quello specificato/corrente in Excel?
• Come creare nuovi fogli per ogni riga in Excel?
• Come eliminare un foglio di lavoro senza prompt o avviso in Excel?