Microsoft Excel är ett populärt kalkylprogram som ger användbara verktyg för inmatning av data , beräkningar , diagram , pivottabeller och mer . Även Excel är ett komplext , fullutrustad program , ger det inte användarna möjlighet att radera alternerande rader i en tabell som standard . Lägga denna funktion kräver att användarna definiera en automatisk uppgift kallas ett makro , kör sedan att makroekonomiskt på kalkylbladsrader de vill förändra . Instruktioner
1
Öppna Excel Visual Basic Editor . Med kalkylbladet öppnas i Excel , klicka på "Verktyg " i menyn längst upp på skärmen , välj sedan " Macro " och " Visual Basic Editor . " Om du använder Excel 2003 eller äldre , gå vidare till nästa steg .
Excel 2007-användare kommer att märka att det föregående kommandot inte finns i den aktuella versionen av Excel , och att inga makro redigeringsverktyg visas som standard . Slå på tillgång till dessa verktyg genom att klicka på Office- knappen i det övre vänstra hörnet av skärmen och sedan klicka på " Excel-alternativ " längst ned på menyn . Leta upp rubriken märkta " De vanligaste alternativen när du arbetar med Excel " i dialogrutan som visas , och sedan markera rutan bredvid " Visa fliken Utvecklare i menyfliksområdet " etikett . Klicka på " OK ". Välj fliken Utvecklare , och klicka sedan på " Visual Basic "-knappen .
2
Lägg makrokod . Klicka på " Infoga " i menyn längst upp i Microsoft Visual Basic Editor-fönstret och välj " . Module " Kopiera all kod som anges nedan , och sedan klistra in den här modulen :
Sub Delete_Every_Other_Row ( ) ' Dimension variables.Y = False ' Ändra detta till true om du vill " ta bort raderna 1 , 3 , 5 , och så on.I = 1Slå xRng = Val ' Loop gång för varje rad i selection.For XCounter = 1 att xRng.Rows.Count " Om Y är sant, då ... Om Y = sant då ' ... ta bort en hel rad av cells.xRng.Cells ( i ) . EntireRow.Delete " Annars ... Else ' . .. stega jag med en så vi kan gå igenom range.I = I + 1End Om ' Om Y är sant att det är falskt , om Y är False , gör det True.Y = Inte YNext xCounterEnd Sub
Sida 3
Kör makrot . Återgå till kalkylbladet utan att stänga Visual Basic Editor . Markera de rader som alternerande rad ska tas bort . I Excel 2003 och tidigare , klicka på " Verktyg" i menyn , välj sedan " Macro " , följt av " Makron " alternativet . I Excel 2007 , välj fliken Utvecklare , och klicka sedan på " Makron . " Att köra makrot i antingen version , välj makrot märkt " Delete_Every_Other_Row " , klicka sedan på " Kör . " Varje jämna raden i kalkylbladet raderar . Addera
