Hoe snel controleren of een blad leeg is in Excel?
Als er enkele lege bladen in een enorme werkmap staan, hoe kunt u dan snel controleren of een blad leeg is in de werkmap en ze vervolgens verwijderen? In Excel is er een ingebouwde functie om te bepalen of een blad leeg is of niet, maar hier introduceer ik een VBA-code om te controleren of een blad leeg is.
Controleer of een blad leeg is met VBA
Controleer of een blad leeg is met VBA
Om te controleren of een blad leeg is, kunt u onderstaande macrocode gebruiken om snel te bepalen of een blad leeg is.
1. Schakel een blad in waarvan u wilt controleren of het leeg is, druk op Alt + F11 sleutel om te openen Microsoft Visual Basic voor toepassingen venster en klik Invoegen > Module om een nieuw te maken Module.
2. Plak in het lege script de onderstaande macrocode erin. Zie screenshot:
VBA: controleer of een blad leeg is
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. Sla de code op en druk op F5 toets om de code uit te voeren, en een dialoogvenster zal verschijnen om u eraan te herinneren dat het blad leeg is of niet.
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!