Hoe kan ik een heel blad wissen met vba?

Om een heel blad in één keer te wissen met VBA-code, moet je twee dingen gebruiken: eerst is de CLEAR-methode en vervolgens CELLS om naar alle cellen in een werkblad te verwijzen .

Actief blad wissen

Stel dat u de volledige inhoud van het activeringsblad wilt wissen, dan ziet de code er als volgt uit.

 Cells.Clear

Wanneer u deze code uitvoert, wordt alles uit alle cellen in het actieve blad gewist. Zoals ik al zei, gebruikten we clear om naar het hele werkblad te verwijzen en clear om het te wissen.

Wis een specifiek blad

Er is één ding dat u moet weten: om een blad leeg te maken, moet dat blad zijn ingeschakeld. Dus laten we zeggen dat u “Blad1” wilt wissen, de code zou er als volgt uitzien:

 Sheets("Sheet1").Activate Cells.Clear

In deze code activeert de eerste “Blad1” en de tweede regel wist alles.

Andere dingen om op te ruimen

U kunt ook de onderstaande methoden gebruiken om verschillende dingen te wissen.

 Cells.ClearContents 'to clear contents Cells.ClearComments 'to clear Comments Cells.ClearFormats 'to clears formatting Cells.ClearHyperlinks 'to clear hyperlinks Cells.ClearNotes 'to clear notes Cells.ClearOutline 'to clears outline

Verwijder een blad uit een specifieke werkmap

De onderstaande code kan verwijzen naar de werkmap “Boek1” en het blad “Blad1” leegmaken. Maar zorg ervoor dat de werkmap geopend is op het moment dat deze code wordt uitgevoerd .

 Workbooks("Book1").Sheets("Sheet1").Activate Cells.Clear

Deze code activeert eerst “Blad1” van het boek en wist het.

Verwijder een blad uit een gesloten werkmap

En in de onderstaande code hebben we verwezen naar “Blad1” van het “voorbeeldbestand” van de werkmap, opgeslagen op een specifieke locatie.

 Sub vba_clear_sheet() Dim wb As Workbook Application.ScreenUpdating = False Set wb = Workbooks.Open("C:\Users\Dell\Desktop\sample-file.xlsx") wb.Sheets("Sheet1").Activate Cells.Clear wb.Close SaveChanges:=True Application.ScreenUpdating = False End Sub