INHOUDSOPGAWE
Hierdie kort tutoriaal verduidelik hoe om elke ander ry in Excel uit te vee deur te filter of met VBA-kode. Jy sal ook leer hoe om elke 3de, 4de of enige ander Nde ry te verwyder.
Daar is baie situasies wanneer jy dalk alternatiewe rye in Excel-werkblaaie moet uitvee. Byvoorbeeld, jy wil dalk data vir ewe weke hou (rye 2, 4, 6, 8, ens.) en alle onewe weke (rye 3, 5, 7 ens.) na 'n ander blad skuif.
Oor die algemeen kom die verwydering van elke ander ry in Excel daarop neer om alternatiewe rye te kies. Sodra die rye gekies is, is 'n enkele slag op die Delete -knoppie al wat nodig is. Verder in hierdie artikel sal jy 'n paar tegnieke leer om vinnig elke ander of elke Nde ry in Excel te selekteer en uit te vee.
Hoe om elke ander ry in Excel uit te vee deur te filter
In wese is 'n algemene manier om elke ander ry in Excel uit te vee: eerstens filter jy alternatiewe rye, kies hulle dan en vee alles gelyktydig uit. Die gedetailleerde stappe volg hieronder:
- Voer 'n volgorde van nulle en ene in 'n leë kolom langs jou oorspronklike data in. Jy kan dit vinnig doen deur 0 in die eerste sel en 1 in die tweede sel te tik, dan die eerste twee selle te kopieer en in die kolom te plak tot die laaste sel met data.
Alternatiewelik kan jy hierdie formule gebruik:
=MOD(ROW(),2)Die formule se logika is baie eenvoudig: die ROW-funksie gee die huidige rynommer terug, die MOD-funksiedeel dit deur 2 en gee die res terug afgerond tot die heelgetal.
As gevolg hiervan het jy 0 in alle ewe rye (omdat hulle eweredig deur 2 gedeel word sonder res) en 1 in alle onewe rye:
- Afhangende van of jy ewe of onewe rye wil uitvee, filter ene of nulle uit.
Om dit te laat doen, kies enige sel in jou Helper-kolom, gaan na die Data -oortjie > Sorteer en Filter -groep, en klik die Filter knoppie. Die aftrek-filterpyle sal in alle kopselle verskyn. Jy klik op die pyltjie-knoppie in die Helper-kolom en merk een van die blokkies:
- 0 om ewe rye uit te vee
- 1 om onewe rye uit te vee
In hierdie voorbeeld gaan ons die rye met "0"-waardes verwyder, so ons filtreer hulle:
- Nou dat alle "1"-rye versteek is, kies al die sigbare "0"-rye, klik met die rechtermuisknop op die seleksie en klik Vee ry uit :
- Die stap hierbo het jou met 'n leë tabel gelaat , maar moenie bekommerd wees nie, die "1"-rye is steeds daar. Om hulle weer sigbaar te maak, verwyder eenvoudig outomatiese filter deur weer op die Filter -knoppie te klik:
- Die formule in kolom C herbereken vir die oorblywende rye, maar jy het dit nie meer nodig nie. Jy kan nou veilig die Helper-kolom uitvee:
Gevolglik is net die ewe weke in ons werkblad oor, die onewe weke is verby!
Wenk. As jy elkeen wil skuifander ry na êrens anders eerder as om hulle heeltemal uit te vee, kopieer eers die gefiltreerde rye en plak dit na 'n nuwe plek, en vee dan die gefiltreerde rye uit.
Hoe om alternatiewe rye in Excel met VBA uit te vee
As jy nie bereid is om jou tyd te mors op 'n onbenullige taak soos om elke ander ry in jou Excel-werkblaaie uit te vee nie, kan die volgende VBA-makro die proses vir jou outomatiseer:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Stel SourceRange = Application.Selection Stel SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count >= 2 Dan Dim FirstCell As Reeks Dim RowIndex As Heelgetal Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) Na 1 Stap -2 Stel FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application =TrueUpdating End If End SubHoe om elke ander ry in Excel uit te vee met die makro
I voeg die makro in jou werkblad in op die gewone manier via die Visual Basic Editor:
- Druk Alt + F11 om die Visual Basic for Applications-venster oop te maak.
- Op die boonste kieslysbalk, klik Insert > Module , en plak die bogenoemde makro in die Module
- Druk die F5-sleutel om die makro te laat loop.
- 'n Dialoog sal verskyn en jou vra om 'n reeks te kies. Kies jou tabel en klikOK:
Klaar! Elke ander ry in die geselekteerde reeks word uitgevee:
Hoe om elke Nde ry in Excel uit te vee
Vir hierdie taak gaan ons die filtering uitbrei tegniek wat ons gebruik het om elke ander ry te verwyder. Die verskil is in die formule waarop die filter gebaseer is:
MOD(ROW()- m, n)Waar:
- m is die rynommer van die eerste sel met data minus 1
- n is die Nde ry wat jy wil uitvee
Kom ons sê jou data begin in ry 2 en jy wil elke 3de ry uitvee. Dus, in jou formule is n gelyk aan 3, en m is gelyk aan 1 (ry 2 minus 1):
=MOD(ROW() - 1, 3)
As ons data begin het in ry 3, dan sal m gelyk wees aan 2 (ry 3 minus 1), ensovoorts. Hierdie regstelling is nodig om die rye opeenvolgend te nommer, begin met die nommer 1.
Wat die formule doen, is om 'n relatiewe rynommer deur 3 te deel en die res na deling terug te gee. In ons geval lewer dit nul vir elke derde ry, want elke derde getal deel deur 3 sonder res (3,6,9, ens.):
En nou, jy voer die reeds bekende stappe uit om "0"-rye te filter:
- Kies enige sel in jou tabel en klik die Filter -knoppie op die Data
- Filter die Helper-kolom om slegs "0"-waardes te wys.
- Kies al die sigbare "0"-rye, regskliek en kies Vee ry uit uit die kontekskieslys.
- Verwyder die filter enskrap die Helper-kolom.
Op 'n soortgelyke wyse kan jy elke 4de, 5de of enige ander Nde ry in Excel uitvee.
Wenk. As jy rye met irrelevante data moet verwyder, sal die volgende tutoriaal nuttig wees: Hoe om rye op grond van selwaarde uit te vee.
Ek bedank jou vir die lees en hoop om jou volgende week weer op ons blog te sien .
