Ynhâldsopjefte
Dizze koarte tutorial ferklearret hoe't jo elke oare rige yn Excel wiskje kinne troch filterjen of mei VBA-koade. Jo sille ek leare hoe't jo elke 3e, 4e of elke oare Nde rige fuortsmite.
Der binne in protte situaasjes wêryn't jo miskien alternatyf rigen yn Excel-wurkblêden wiskje moatte. Jo kinne bygelyks gegevens foar even wiken hâlde (rige 2, 4, 6, 8, ensfh.) en alle ûneven wiken (rigen 3, 5, 7 ensfh.) nei in oar blêd ferpleatse.
Yn 't algemien komt it wiskjen fan elke oare rige yn Excel del op it selektearjen fan alternative rigen. Sadree't de rigen binne selektearre, is in inkele slach op de Wiskje knop alles wat it nimt. Fierderop yn dit artikel sille jo in pear techniken leare om fluch elke oare of elke Nde rige yn Excel te selektearjen en te wiskjen.
Hoe kinne jo elke oare rige yn Excel wiskje troch te filterjen
Yn essinsje is in mienskiplike manier om elke oare rige yn Excel te wiskjen dit: earst filterje jo alternatyf rigen, selektearje se dan en wiskje alles tagelyk. De detaillearre stappen folgje hjirûnder:
- Yn in lege kolom neist jo orizjinele gegevens, fier in folchoarder fan nullen en enen yn. Jo kinne dit fluch dwaan troch 0 te typen yn 'e earste sel en 1 yn' e twadde sel, kopiearje dan de earste twa sellen en plak se yn 'e kolom oant de lêste sel mei gegevens.
As alternatyf kinne jo dizze formule brûke:
=MOD(ROW(),2)De logika fan 'e formule is heul ienfâldich: de ROW-funksje jout it hjoeddeistige rigenûmer werom, de MOD-funksjedielt it troch 2 en jout de rest ôfrûn op it hiele getal werom.
As resultaat hawwe jo 0 yn alle even rigen (omdat se dield wurde troch 2 lyklik sûnder rest) en 1 yn alle ûneven rigen:
- Ofhinklik fan oft jo even of ûneven rigen wiskje wolle, filterje ienen of nullen.
Om it dien te meitsjen, selektearje elke sel yn jo Helperkolom, gean nei it ljepblêd Gegevens > Sortearje en filterje groep, en klikje op de Filter knop. De dellûk-filterpylken sille ferskine yn alle koptekstellen. Jo klikke op de pylkknop yn 'e Helper-kolom en selektearje ien fan 'e fakjes:
- 0 om even rigen te wiskjen
- 1 om ûneven rigen te wiskjen
Yn dit foarbyld sille wy de rigen mei "0" wearden fuortsmite, sadat wy se filterje:
- No't alle "1" rigen ferburgen binne, selektearje alle sichtbere "0" rigen, klik mei de rjochter-klik op de seleksje en klik op Rige wiskje :
- De boppesteande stap hat jo in lege tabel litten , mar meitsje jo gjin soargen, de "1" rigen binne der noch. Om se wer sichtber te meitsjen, ferwiderje jo it autofilter gewoan troch opnij op de knop Filter te klikken:
- De formule yn kolom C berekkent opnij foar de oerbleaune rigen, mar do hast it net mear nedich. Jo kinne no feilich de Helper-kolom wiskje:
As resultaat binne allinich de even wiken oer yn ús wurkblêd, de ûneven wiken binne fuort!
Tip. As jo elkear ferpleatse wolleoare rige nei earne oars as se hielendal wiskje, kopiearje earst de filtere rigen en plak se nei in nije lokaasje, en wiskje dan de filtere rigen.
Hoe kinne jo alternatyf rigen yn Excel wiskje mei VBA
As jo net ree binne om jo tiid te fergrieme oan in triviale taak, lykas it wiskjen fan elke oare rige yn jo Excel-wurkblêden, kin de folgjende VBA-makro it proses foar jo automatisearje:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Selektearje it berik" , SourceRange.Address, Type :=8) As SourceRange.Rows.Count >= 2 Dan Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1 Stap -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdat End If End SubHoe kinne jo elke oare rige yn Excel wiskje mei de makro
I nsert de makro yn jo wurkblêd op 'e gewoane manier fia de Visual Basic Editor:
- Druk op Alt + F11 om it finster fan Visual Basic for Applications te iepenjen.
- Op 'e boppeste menubalke, klik op Ynfoegje > Module , en plak de boppesteande makro yn de Module
- Druk op de F5-kaai om de makro út te fieren.
- In dialoochfinster sil ferskine en jo freegje om in berik te selektearjen. Selektearje jo tabel en klikjeOK:
Klear! Elke oare rige yn it selekteare berik wurdt wiske:
Hoe kinne jo elke Nde rige yn Excel wiskje
Foar dizze taak sille wy de filtering útwreidzje technyk dy't wy hawwe brûkt om elke oare rige te ferwiderjen. It ferskil sit yn de formule wêrop it filterjen basearre is:
MOD(ROW()- m, n)Wêr:
- m is it rigenûmer fan 'e earste sel mei gegevens minus 1
- n is de Nde rige dy't jo wiskje wolle
Litte wy sizze dat jo gegevens begjinne yn rige 2 en jo wolle elke 3e rige wiskje. Dus, yn jo formule is n lyk oan 3, en m is lyk oan 1 (rige 2 minus 1):
=MOD(ROW() - 1, 3)
As ús gegevens begûnen yn rige 3, dan soe m gelyk wêze oan 2 (rige 3 minus 1), ensfh. Dizze korreksje is nedich om de rigen sequentially te nûmerjen, begjinnend mei it nûmer 1.
Wat de formule docht is in relatyf rigenûmer te dielen troch 3 en de rest werom nei divyzje werom. Yn ús gefal jout it nul foar elke tredde rige, om't elk tredde getal dielt troch 3 sûnder rest (3,6,9, ensfh.):
En no, jo fier de al bekende stappen út om "0" rigen te filterjen:
- Selektearje elke sel yn jo tabel en klikje op de Filter knop op de Gegevens
- Filterje de Helperkolom om allinich "0" wearden te sjen.
- Selektearje alle sichtbere "0" rigen, klik mei de rjochter mûsknop en kies Rij wiskje út it kontekstmenu.
- Ferwiderje it filter enwiskje de Helperkolom.
Op in fergelykbere manier kinne jo elke 4e, 5e of elke oare Nde rige yn Excel wiskje.
Tip. Yn gefal moatte jo rigen fuortsmite mei irrelevante gegevens, de folgjende tutorial sil nuttich komme: Hoe kinne jo rigen wiskje op basis fan selwearde.
Ik tankje jo foar it lêzen en hoopje jo nije wike wer op ús blog te sjen .
