Microsoft Excel er et populært regnearksprogram , der giver nyttige værktøjer til indtastning af data , beregning , graftegning , pivottabeller og meget mere. Selvom Excel er en kompleks , fuldt udstyret program , betyder det ikke giver brugerne mulighed for at slette alternerende rækker i et regneark som standard. Tilføjelse denne funktionalitet kræver, at brugerne til at definere en automatiseret opgave kaldes en makro , derefter køre denne makro på regnearkets rækker , de ønsker at ændre. Instruktioner
1
Åbn Excel Visual Basic Editor. Med dit regneark åben i Excel, "Tools " i menuen øverst på skærmen klik , og vælg derefter "Macro " og " Visual Basic Editor. " Hvis du bruger Excel 2003 eller ældre , skal du gå videre til den næste trin .
Excel 2007-brugere vil bemærke , at den tidligere kommando ikke findes i den aktuelle version af Excel, og at der ikke makro redigeringsværktøjer vises som standard . Tænd adgang til disse værktøjer ved at klikke på Office- knappen i øverste venstre hjørne af skærmen , og derefter klikke på " Excel-indstillinger "-knappen i bunden af menuen. Find overskriften mærket "Top muligheder for at arbejde med Excel " i den resulterende dialogboks , og marker feltet ved siden af " Vis fanen Udvikler på båndet " label . Klik på "OK". Vælg fanen Udvikler , og klik derefter på " Visual Basic "-knappen.
2
Tilføj makro kode. Klik på "Indsæt" i menuen øverst på Microsoft Visual Basic-editoren vindue og vælg " . Module" Kopier hele koden nedenfor , derefter indsætte den i dette modul : Hej
Sub Delete_Every_Other_Row ( ) ' dimension variables.Y = False ' ændre denne til True , hvis du ønsker at ' slette rækker 1, 3, 5 , og så on.I = 1Indstil xRng = Selection ' Loop én gang for hver række i selection.For xCounter = 1 at xRng.Rows.Count »Hvis Y er sand, så ... Hvis Y = Ægte Then ' ... slette en hel række af cells.xRng.Cells ( i). EntireRow.Delete ' Ellers ... Else ". .. tilvækst I efter én, så vi kan cykle gennem range.I = I + 1End If ' Hvis Y er sand, gør det False , hvis Y er False , gør det True.Y = Ikke YNext xCounterEnd Sub
3
Kør makroen. Vend tilbage til dit regneark uden at lukke Visual Basic editor. Fremhæv rækkerne for hvilke vekslende række skal fjernes . I Excel 2003 og tidligere, skal du klikke på menuen "Funktioner" og derefter vælge "Macro " , efterfulgt af " makroer" valgmulighed. I Excel 2007 fanen Udvikler vælg og klik på " makroer . " Sådan køres makroen i enten version , skal du vælge den makro mærket " Delete_Every_Other_Row " og derefter klikke på "Kør . " Hver lige numre række i regnearket sletter .