Cum să verificați rapid dacă o foaie este goală în Excel?

Dacă există niște foi goale într-un registru de lucru imens, cum poți să verifici rapid dacă o foaie este goală în registrul de lucru și apoi să o ștergi? În Excel, există o funcție încorporată pentru a determina dacă o foaie este goală sau nu, dar aici, vă introduc un cod VBA pentru a verifica dacă o foaie este goală.

Verificați dacă o foaie este goală cu VBA

Verificați dacă o foaie este goală cu VBA

Pentru a verifica dacă o foaie este goală, puteți utiliza codul macro de mai jos pentru a determina rapid dacă o foaie este goală.

1. Activați o foaie pe care doriți să o verificați dacă este goală, apăsați Alt + F11 tasta pentru a deschide Microsoft Visual Basic pentru aplicații fereastră și faceți clic pe Insera > Module pentru a crea un nou Module.

2. În scriptul gol, lipiți sub acesta codul macro. Vedeți captura de ecran:

VBA: Verificați dacă o foaie este goală

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ți codul și apăsați F5 pentru a rula codul și va apărea un dialog pentru a vă informa dacă foaia este goală sau nu.

OR