Microsoft Excel is een populaire spreadsheet- applicatie die handige tools voor data-entry , berekeningen , grafieken , draaitabellen en meer biedt . Hoewel Excel is een complexe , volledig uitgeruste programma , het niet geven gebruikers de mogelijkheid om afwisselende rijen van een spreadsheet standaard verwijderen . Deze functionaliteit toe te voegen vereist dat gebruikers een geautomatiseerde taak heet een macro te definiëren , dan lopen die macro op de werkbladrijen ze willen veranderen . Instructies
1 Open het Excel Visual Basic Editor . Met uw spreadsheet openen in Excel , klikt u op 'Extra' in het menu aan de bovenkant van je scherm , kies dan " Macro" en " Visual Basic Editor . " Als je Excel 2003 of ouder gebruikt, gaat u door naar de volgende stap . Excel 2007 -gebruikers
zullen merken dat het vorige commando bestaat niet in de huidige versie van Excel , en dat er geen macro editing tools standaard verschijnen . Schakel de toegang tot deze tools door op de Office -knop op de linkerbovenhoek van het scherm , vervolgens te klikken op de " Opties voor Excel " knop aan de onderkant van het menu . Zoek de rubriek genaamd " Belangrijke opties voor het werken met Excel ' in het dialoogvenster dat verschijnt , controleer dan het vakje naast de " Tabblad Ontwikkelaars op het lint " label . Klik op ' OK '. Selecteer het tabblad Ontwikkelaars en klik op de knop " Visual Basic " . Kopen van 2 In macro -code . Klik op "Invoegen " in het menu aan de bovenkant van de Basic editor venster van Microsoft Visual en kies " . Module " Kopieer alle van de onderstaande code , dan plak het in deze module : Sub Delete_Every_Other_Row
( ) ' Dimension variables.Y = False ' Wijzig deze op True als je wilt ' rijen 1 , 3 , 5 verwijderen , en dus on.I = 1Set XRNG = Selection ' Loop eens voor elke rij in de selection.For xCounter = 1 om xRng.Rows.Count ' Als Y waar is, dan ... Als Y = True Then' ... verwijdert een hele rij van cells.xRng.Cells ( I ) . EntireRow.Delete ' Anders ... Else ' . .. verhoog ik voor een, zodat we kunnen fietsen door range.I = I + 1End Als ' Als Y True , maken het False , als Y is False , maken het True.Y = Niet YNext xCounterEnd Sub
Goedkope 3 de macro uitvoeren . Keer terug naar uw spreadsheet zonder het sluiten van de Visual Basic -editor . Markeer de rijen waarvoor afwisselende rij moeten worden verwijderd . In Excel 2003 en eerder: klik op het menu "Extra" -optie , selecteer " Macro " , gevolgd door de optie " Macro's " . In Excel 2007 , selecteert u het tabblad Ontwikkelaars en klik op ' Macro's . "Om de macro uit te voeren in een van beide versie , selecteert u de macro label" Delete_Every_Other_Row " , klik op " Uitvoeren . "Elke even genummerde rij van uw spreadsheet verwijdert .
|
