Kako izbrisati vse, razen izbranih obsegov v Excelu?
V Excelu lahko hitro in neposredno izbrišemo izbrane obsege, vendar ste že kdaj poskušali izbrisati druge vsebine celic, razen izbranih obsegov? V tem članku vam bom predstavil nekaj trikov za hitro in enostavno reševanje te naloge v Excelu.
Izbrišite vse obsege, razen izbranih, s kodo VBA
Izbrišite vse obsege, razen izbranih, s Pomočnikom za izbiro obsega Kutools za Excel
Z obsegom kopiranja Kutools za Excel izbrišite vse obsege, razen izbranih
Izbrišite vse obsege, razen izbranih, s kodo VBA
Ne morete neposredno izbrisati vseh neizbranih vrednosti celic hkrati, vendar vam bo morda v pomoč naslednja koda VBA, naredite naslednje:
1. Pridržite Ctrl tipko, da izberete celice, ki jih želite obdržati.
2. Pritisnite Alt + F11 tipke hkrati, da odprete Microsoft Visual Basic za uporabo okno.
3. v Microsoft Visual Basic za uporabo okno, kliknite Vstavi > Moduli, nato kopirajte in prilepite spodnjo kodo VBA v Moduli okno.
Koda VBA: izbrišite vse vrednosti celic, razen izbranih obsegov
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. Nato pritisnite F5 tipko za zagon te kode in pojavilo se bo pozivno polje, ki vas bo opozorilo, da izberete obseg celic, ki jih želite obdržati. Če ste obsege izbrali v 1. koraku, kliknite OK, če ne, lahko v pozivnem polju izberete želene celice in vnesete vejice, da ločite več obsegov, nato pa kliknete OK gumb, glej posnetek zaslona:
5. Po kliku OK, vse druge vrednosti celic so bile izbrisane, vendar samo, če zapustite izbrane obsege, glejte posnetek zaslona:
Izbrišite vse obsege, razen izbranih, s Pomočnikom za izbiro obsega Kutools za Excel
Če ste namestili Kutools za Excel, Z njegovim Inverzna izbira značilnost Izberite Range Helper Pripomoček lahko hitro obrnete izbor in nato naenkrat izbrišete obrnjene izbore.
Kutools za Excel : z več kot 300 priročnimi dodatki za Excel, ki jih lahko brezplačno preizkusite v 30 dneh. |
Po namestitvi Kutools za Excel, naredite naslednje :( Brezplačno prenesite Kutools za Excel zdaj! )
1. Izberite obsege celic, ki jih želite obdržati.
2. Nato kliknite Kutools > Izberite > Izberite Range Helper, glej posnetek zaslona:
3. v Izberite Range Helper pogovorno okno, preverite Inverzna izbira, glej posnetek zaslona:
4. Nato povlecite miško, da izberete obseg, ki ga želite obrniti. Ko spustite miško, so bile izbrane celice preklicane in neizbrane celice so bile izbrane hkrati. Oglejte si posnetek zaslona:
5. Nato zaprite pogovorno okno in pritisnite Brisanje tipko, da izbrišete izbire hkrati. In ohranjene so bile le vaše želene celice, glejte posnetek zaslona:
Brezplačno prenesite Kutools za Excel zdaj!
Izbrišite vse obsege, razen izbranih, s Pomočnikom za izbiro obsega Kutools za Excel
Druga korist -Obsegi kopiranja of Kutools za Excel lahko tudi vam pomaga dokončati to opravilo, kopirati morate izbrane obsege na nov delovni list in nato izbrisati stari.
Po namestitvi Kutools za Excel, naredite naslednje: Brezplačno prenesite Kutools za Excel zdaj! )
1. Drži Ctrl tipko, da izberete obseg celic, ki jih želite obdržati.
2. Nato kliknite Kutools > Obsegi kopiranja, glej posnetek zaslona:
3. In v Kopirajte več razponov pogovorno okno, preverite vsi možnost pod Prilepite posebno, preveri Vključno z višino vrstice in Vključno s širino stolpca če želite obdržati želeno višino vrstice in širino stolpca, si oglejte posnetek zaslona:
4. Nato kliknite Ok in pojavilo se bo drugo pozivno polje, ki vas bo opozorilo, da izberete celico, v katero želite kopirati celice, izberite celico v novem delovnem listu, glejte posnetek zaslona:
5. In nato kliknite OK, in samo izbrani obsegi so bili prilepljeni v nov delovni list, zdaj pa lahko izvirni delovni list po potrebi izbrišete.
Brezplačno prenesite Kutools za Excel zdaj!
Predstavitev: z Kutools za Excel izbrišite vse obsege, razen izbranih
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!