Hoppa till huvudinnehåll

Hur tar jag bort alla utom valda intervall i Excel?

I Excel kan vi snabbt och direkt radera de valda områdena, men har du någonsin försökt ta bort annat cellinnehåll utom de valda områdena? Den här artikeln kommer jag att presentera några knep för dig för att lösa denna uppgift i Excel snabbt och enkelt.

Ta bort alla utom valda intervall med VBA-kod

Ta bort alla utom valda intervall med Select Range Helper of Kutools for Excel

Ta bort alla utom valda intervall med Copy Range of Kutools for Excel


Ta bort alla utom valda intervall med VBA-kod

Det finns inget direkt sätt för dig att ta bort alla icke markerade cellvärden samtidigt, men följande VBA-kod kan hjälpa dig, gör så här:

1. Vänligen håll ctrl för att välja de celler som du vill behålla.

doc ta bort alla utom valda 1

2. Tryck Alt + F11 samtidigt för att öppna Microsoft Visual Basic för applikation fönster.

3. I Microsoft Visual Basic för applikation dialogrutan, klicka Insert > Modulerna, kopiera och klistra in nedanstående VBA-kod i Modulerna fönster.

VBA-kod: ta bort alla cellvärden men de valda intervallen

Sub ClearAllExceptSelection()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In ActiveSheet.UsedRange
        If Intersect(xCell, xRg) Is Nothing Then
            xCell.Clear
        End If
    Next
    Application.ScreenUpdating = xUpdate
End Sub

4. Tryck sedan på F5 för att köra den här koden, och en snabbruta visas för att påminna dig om att välja det cellområde som du vill behålla, om du har valt intervallen i steg 1, klicka på OK, om inte, kan du välja de celler du vill ha i rutan och ange kommatecken för att separera flera intervall och klicka sedan på OK knapp, se skärmdump:

doc ta bort alla utom valda 2

5. Efter att ha klickat OK, alla andra cellvärden har tagits bort men bara lämnat de valda områdena, se skärmdump:

doc ta bort alla utom valda 3


Ta bort alla utom valda intervall med Select Range Helper of Kutools for Excel

Om du har installerat Kutools för Excel, med dess Omvändt val egenskap av Välj Range Helper verktyget kan du snabbt vända markeringen och sedan radera de omvända valen på en gång.

Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. 

När du har installerat Kutools för Excel, gör så här :( Gratis nedladdning Kutools för Excel nu! )

1. Välj cellernas intervall som du vill behålla.

2. Klicka sedan Kutools > Välja > Välj Range Helper, se skärmdump:

3. I Välj Range Helper dialogruta, kontrollera Omvändt val, se skärmdump:

doc ta bort alla utom valda 5

4. Och dra sedan musen för att välja det intervall som du vill vända på valen. När du släpper musen har de valda cellerna avmarkerats och de icke markerade cellerna har valts på en gång. Se skärmdump:

doc ta bort alla utom valda 6

5. Stäng sedan dialogrutan och tryck på Radera för att radera valen på en gång. Och bara dina önskade celler har behållits, se skärmdump:

doc ta bort alla utom valda 7

Gratis nedladdning Kutools för Excel nu!


Ta bort alla utom valda intervall med Select Range Helper of Kutools for Excel

Ett annat verktyg-Kopiera intervall of Kutools för Excel kan också hjälpa dig att slutföra det här jobbet, du behöver bara kopiera dina valda intervall till ett nytt kalkylblad och sedan ta bort det gamla kalkylbladet.

När du har installerat Kutools för Excel, gör med följande steg :( Gratis nedladdning Kutools för Excel nu! )

1. Håll ctrl för att välja cellernas intervall som du vill behålla.

2. Klicka sedan Kutools > Kopiera intervall, se skärmdump:

3. Och i Kopiera flera områden dialogruta, kontrollera Alla alternativet under Klistra in speciellt, kolla upp Inklusive radhöjd och Inklusive kolonnbredd om du vill behålla den radhöjd och kolumnbredd du vill ha, se skärmdump:

doc ta bort alla utom valda 9

4. Klicka sedan Ok -knappen, och en annan snabbruta dyker upp för att påminna dig om att du väljer en cell för att placera de kopierade cellerna, välj en cell i ett nytt kalkylblad, se skärmdump:

doc ta bort alla utom valda 10

5. Och klicka sedan på OK, och endast dina valda intervall har klistrats in i det nya kalkylbladet, och nu kan du radera det ursprungliga kalkylbladet efter behov.

Gratis nedladdning Kutools för Excel nu!


Demo: Ta bort alla utom valda intervall med Kutools för Excel

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations