Hoe het hele blad of het opgegeven bereik in Excel te wissen?
Dit artikel laat u zien hoe u snel de inhoud kunt wissen met of zonder celopmaak van het hele blad of het opgegeven bereik met VBA-code in Excel.
Wis het hele blad met VBA-code in Excel
Wis het opgegeven bereik met VBA-code in Excel
Wis het hele blad met VBA-code in Excel
De onderstaande VBA-codes helpen u om het hele blad met of zonder celopmaak te wissen.
1. druk de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Moduleen kopieer vervolgens onderstaande VBA-code naar de module.
Als u alleen de celinhoud wilt wissen maar de opmaak wilt behouden, probeer dan deze code.
VBA-code: wis het hele blad zonder celopmaak
Sub sbClearEntireSheetOnlyData()
Sheets("Sheet4").Cells.ClearContents
End Sub
Als u zowel de inhoud als de celopmaak wilt wissen, kan deze code u helpen.
VBA-code: wis het hele blad met celopmaak
Sub sbClearEntireSheet()
Sheets("Sheet4").Cells.Clear
End Sub
Note: In de code is Sheet4 de naam van het werkblad waarvan u de inhoud wilt wissen. Wijzig het indien nodig.
3. druk de F5 toets of klik op de knop Uitvoeren om de code uit te voeren.
Vervolgens wordt het opgegeven werkblad met of zonder celopmaak onmiddellijk gewist.
Wis het opgegeven bereik met VBA-code in Excel
Om alleen het opgegeven bereik in een werkblad te wissen, kunt u de volgende VBA-code proberen.
1. Open het werkblad waaruit u het opgegeven bereik wilt wissen en druk op anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Moduleen kopieer vervolgens onderstaande VBA-code naar de module.
Wis het bereik maar behoud de opmaak, probeer deze code.
VBA-code: gespecificeerd bereik wissen zonder celopmaak
Sub sbClearCellsOnlyData()
Range("A1:C10").ClearContents
End Sub
Bereik wissen met celopmaak, gebruik deze code:
VBA-code: gespecificeerd bereik wissen met celopmaak
Sub sbClearCells()
Range("A1:C10").Clear
End Sub
Note: A1: C10 is het bereik dat u in het werkblad wilt wissen.
3. druk de F5 toets of klik op de lopen knop om het bereik te wissen.
Gerelateerde artikelen:
- Hoe beperkte waarden in cellen in Excel te wissen?
- Hoe filtercache (oude items) uit de draaitabel in Excel te wissen?
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!