Come verificare rapidamente se un foglio è vuoto in Excel?

Se ci sono alcuni fogli vuoti in una cartella di lavoro molto grande, come puoi verificare rapidamente se un foglio è vuoto nella cartella di lavoro e poi eliminarlo? In Excel, esiste una funzione integrata per determinare se un foglio è vuoto o meno, ma qui ti presento un codice VBA per controllare se un foglio è vuoto.

Verifica se un foglio è vuoto con VBA

Verifica se un foglio è vuoto con VBA

Per verificare se un foglio è vuoto, puoi utilizzare il seguente codice macro per determinare rapidamente se un foglio è vuoto.

1. Attiva il foglio che desideri controllare se è vuoto, premi Alt + F11 per aprire Microsoft Visual Basic for Applications finestra, e clicca su Inserisci > Modulo per creare un nuovo Modulo.

2. Nello script vuoto, incolla il seguente codice macro. Vedi screenshot:

VBA: Verifica se un foglio è vuoto

Sub CheckSheetEmpty()
'UpdatebyExtendoffice20170830
    If WorksheetFunction.CountA(ActiveSheet.UsedRange) = 0 And ActiveSheet.Shapes.Count = 0 Then
        MsgBox "Sheet is empty", vbInformation, "KuTools For Excel"
    Else
        MsgBox "Sheet is not empty", vbInformation, "KuTools For Excel"
    End If
End Sub

3. Salva il codice e premi il tasto F5 per eseguire il codice, e apparirà una finestra di dialogo per informarti se il foglio è vuoto o meno.

O