Excel: kustutage iga teine rida - kas see on võimalik?
Microsoft Exceli abil saate automaatselt kustutada iga teise rea. Selles praktilises näpunäites selgitame, kuidas see töötab.
Esialgne: näidake arendaja tööriistu iga kahe rea kustutamiseks
- Klõpsake vasakus ülanurgas oleval nupul Office, seejärel valige "Exceli suvandid".
- Minge jaotisse "Sageli kasutatud". Jaotises „Kõige tavalisemad valikud Exceliga töötamisel” lubage suvand „Kuva arendaja vahekaart ribas”.
- Kinnitage muudatus nupuga "Salvesta".
Excel: kustutage programmikoodiga iga teine rida
Microsoft on selle jaoks välja andnud programmikoodi, mida saate kasutada. Toimige järgmiselt:
- Avage fail, milles vastavad tabeli andmed asuvad.
- Nüüd klõpsake "Arendaja tööriistad" ja jaotises "Kood" minge jaotisse "Visual Basic".
- Nüüd avaneb Visual Basic Editor. Siin klõpsake "Lisa" ja seal "Moodul".
- Kopeerige moodulisse järgmine kood (ilma jutumärkideta): "Sub Delete_Every_Other_Row () 'Mõõtmete muutujad. Y = False" Muutke see väärtuseks True, kui soovite' 1., 3., 5. jne. Rida kustutada. I = 1 Määrake xRng = Selection "Looge üks kord iga valiku jaoks. XCounter = 1 kuni xRng.Rows.Count" Kui Y on tõene, siis ... Kui Y = tõsi siis "... kustutage terve lahtririda. xRng.Cells (I) .EntireRow.Delete 'Vastasel korral ... Else' ... I juurdekasvuga ühe võrra, et saaksime ringi liikuda. I = I + 1 Lõpp Kui 'Kui Y on tõene, siis tehke see valeks, kui Y on vale, muuda see tõeseks. Y = ei Y järgmine xCounter End Sub "
- Nüüd minge tagasi oma Exceli faili ja märkige veerud, kust iga teine rida tuleks kustutada.
- Seejärel klõpsake ala "Kood" jaotises "Arendaja" valikul "Makrod". Seal näete makro "Delete_Every_Other_Row", mida alustate käsuga "Käivita".
See praktiline näpunäide viidi ellu rakendusega Excel 2007. Exceli abil saate arvutada ka liitintressi või kolme määra.