Excel VBA för att rensa innehållet i ett intervall (3 lämpliga fall)

  • Dela Detta
Hugh West

Om du letar efter lösningen eller några speciella knep för att rensa innehållet i ett intervall med Excel VBA har du hamnat på rätt plats. Det finns några enkla steg för att rensa innehållet i intervallet med Excel VBA I den här artikeln kommer du att få se varje steg med ordentliga illustrationer så att du enkelt kan använda dem för ditt syfte. Låt oss gå in på den centrala delen av artikeln.

Ladda ner övningsboken

Du kan ladda ner övningsboken här:

Rensa innehållet i Range.xlsm

Rensa innehållet i ett intervall med Excel VBA: 3 fall

Anta att du har en datamängd som du kanske vill återanvända för att rensa befintliga celler. Så du kan använda VBA-kod för att rensa innehållet i en Excel-fil. I det här avsnittet kommer jag att visa dig de snabba och enkla metoderna för att rensa innehållet i ett intervall med Excel VBA på operativsystemet Windows. Du hittar detaljerade förklaringar med tydliga illustrationer av varje sak i den här artikeln. Jag har använt mig av Microsoft 365-version Här. Men du kan använda alla andra versioner som du har tillgång till. Om något i den här artikeln inte fungerar i din version, lämna oss en kommentar.

Fall 1: Rensa allt innehåll i intervallet

Du kan använda både kommandot Rensa och kommandot Ta bort för att rensa innehållet i ett visst intervall i det aktuella arbetsbladet eller andra arbetsblad, även från andra arbetsböcker. Jag ska visa dig alla fall ett efter ett.

i. Rensa innehållet i ett visst intervall av celler

Om du vill rensa innehållet i ett specifikt intervall följer du stegen nedan:

📌 Steg:

  • För att göra detta går du först till det övre bandet och trycker på Utvecklare och tryck sedan på Visual Basic från menyn.
  • Du kan använda ALT + F11 för att öppna "Microsoft Visual Basic för tillämpningar" om du inte har lagt till fliken Utvecklare.

  • Nu öppnas ett fönster med namnet "Microsoft Visual Basic för tillämpningar" visas. Tryck här i den övre menyraden på "Infoga" En meny kommer att visas. Välj den "Modul'" alternativ.

  • Nu har en ny "Modul" visas. och Klistra in den här VBA-koden i rutan.

Använda Clear Command:

 Sub Clear_Contents_Range() Range("B4:D5").Clear End Sub 

  • För att köra koden går du till den övre menyn, trycker på Kör och här kommer att öppna några andra alternativ och Välj Kör Sub/UserForm Du kan också helt enkelt trycka på F5 för att köra koden.

  • Användning av Klart kommer cellerna att rensas och även formateringen kommer att tas bort, men de tomma cellerna kommer att finnas kvar.

Använda kommandot Radera:

Du kan också använda Ta bort kommandot istället för kommandot Klart och klistra sedan in följande kod i modulen.

 Sub Delete_Contents_Range() Range("B4:D5").Delete End Sub 

När du kör koden med kommandot Ta bort kommer det markerade området med celler att bort helt och hållet.

Läs mer: Excel VBA: Rensa innehåll om cellen innehåller specifika värden

Skillnaden mellan kommandot Rensa och Ta bort i Excel VBA:

Den viktigaste skillnaden mellan Klart och Ta bort kommandon i Excel VBA är att den Ta bort Kommando tar bort Det markerade området av celler helt och hållet, medan kommandot Rensa endast tar bort cellvärdet och formateringen, men den tomma cellen kommer att finnas kvar.

ii. Tydligt innehåll i hela arbetsbladet

Om du vill rensa alla celler i ett kalkylblad kan du använda koden nedan. Här rensar jag innehållet från kalkylbladet "1.2". Du måste infoga namn av den arbetsblad som du vill rensa inom de inomliggande kommatecken.

 Sub Delete_Contents_Range() Arbetsblad("1.2").Cells.Clear End Sub 

Du kan också använda Ta bort kommandot för att ta bort alla använda celler i ett arbetsblad. Därefter måste du använda koden nedan. Ändra bara arbetsbladets namn i de inverterade kommatecken.

 Sub Delete_Contents_Range() Arbetsblad("1.2").Cells.Delete End Sub 

iii. Rensa innehållet i det aktiva arbetsbladet

Ibland kan det hända att du behöver rensa innehållet i det aktiva arbetsbladet. I det här fallet måste du använda en enkel kod som ges nedan:

 Sub Delete_Contents_Range() ActiveSheet.Cells.Clear End Sub 

Du kan också använda kommandot delete för att ta bort cellerna helt och hållet från det aktiva arbetsbladet.För att göra detta klistrar du in följande kod i modulen.

Sub Delete_Contents_Range()

ActiveSheet.Cells.Delete

Slutar under

Läs mer: Skillnaden mellan radera och rensa innehåll i Excel

Fall 2: Rensa innehållet i området med bibehållen formatering

I de tidigare metoderna har du märkt att du tar bort cellvärdena tillsammans med cellformateringen. Så om du vill ta bort endast cellvärdena och behålla formateringen samma.

i. Innehållet i det särskilda sortimentet

Du kan använda ClearContents kommandot i Excel VBA för att rensa innehållet i ett visst intervall. För detta klistrar du in följande kod i modulen.

 Sub Delete_cell_Keeping_format() Range("B2:D4").ClearContents End Sub 

När du kör koden kommer du att se att de markerade cellerna rensas, men att formaten fortfarande finns kvar.

Läs mer: Hur du rensar celler med visst värde i Excel (2 sätt)

ii. Innehållet i det särskilda arbetsbladet

När du vill rensa innehållet i ett visst arbetsblad samtidigt som du behåller samma format måste du använda följande kod nedan:

 Sub Delete_Worksheet_Cells_Keeping_format() Arbetsblad("2.2").Range("B2:D4").ClearContents End Sub 

🔎 VBA-kod Förklaring:

  • Arbetsblad("2.2") kallar arbetsbladet som heter "2.2" om du vill kalla ett arbetsblad med något annat namn, sätt in arbetsbladets namn i gemenerna.
  • Och, Range("B2:D4") anger det område av celler som ska rensas. Du kan redigera cellområdet enligt dina behov.

iii. Innehåll från annan arbetsbok

Du kan också klart innehåll en annan arbetsbok med hjälp av VBA kod. Men för att göra detta måste du hålla den arbetsboken öppna Använd följande kod för detta:

 Sub Delete_Other_Workbook_Cells_Keeping_format() Arbetsböcker("fil 1").Arbetsblad("Sheet1").Range("B3:D12").ClearContents End Sub 

🔎 VBA-kod Förklaring:

  • Arbetsböcker("fil 1") kallar arbetsboken som heter "Fil 1". När du använder dina arbetsböcker måste du sätta in arbetsbokens namn i gemenerna.
  • Arbetsblad("Sheet1") kallar arbetsbladet som heter "Blad 1". Om du vill anropa ett annat kalkylblad är det bara att sätta in namnet på kalkylbladet i stället för "Blad 1" i den här koden.
  • Och, Range("B3:D13") anger det område av celler som ska rensas. Du kan redigera cellområdet enligt dina behov.

Läs mer: Hur du rensar innehåll utan att ta bort formler med VBA i Excel

Fall 3: Rensa innehållet i ett visst område i alla arbetsblad på en gång

Om du behöver klart innehåll av ett visst intervall av flera arbetsblad du kan göra det på en gång med hjälp av en VBA Du måste använda For-slingan för att utföra denna uppgift. Klistra in denna kod i modulen för att rensa innehållet i intervallet B2:D4 för alla kalkylblad. Om du vill ändra cellintervallet redigerar du 4:e raden och infoga ditt datavärde.

 Sub Clear_Specific_Range_All_Worksheets() Dim W_S As Worksheet For Each W_S In ActiveWorkbook.Worksheets W_S.Range("B2:D4").ClearContents Next W_S End Sub 

Saker att komma ihåg

  • Användning av Klart kommandot rensar bara cellvärden och format.
  • Ta bort kommer att ta bort cellerna helt och hållet.
  • ClearContents kommandot raderar endast cellernas värden och behåller cellformaten oförändrade.

Slutsats

I den här artikeln har du fått reda på hur du kan rensa innehållet i ett intervall med Excel VBA . Jag hoppas att du tyckte att den här artikeln var till hjälp. Du kan besöka vår webbplats ExcelWIKI för att lära dig mer Excel-relaterat innehåll. Om du har kommentarer, förslag eller frågor kan du skriva dem i kommentarsfältet nedan.

Hugh West är en mycket erfaren Excel-tränare och analytiker med över 10 års erfarenhet i branschen. Han har en kandidatexamen i redovisning och ekonomi och en magisterexamen i företagsekonomi. Hugh har en passion för undervisning och har utvecklat ett unikt undervisningssätt som är lätt att följa och förstå. Hans expertkunskap om Excel har hjälpt tusentals studenter och yrkesverksamma över hela världen att förbättra sina färdigheter och utmärka sig i sina karriärer. Genom sin blogg delar Hugh med sig av sin kunskap med världen, och erbjuder gratis Excel-handledning och onlineutbildning för att hjälpa individer och företag att nå sin fulla potential.