Microsoft Excel er et regnearkprogram med avansert funksjonalitet for manipulering , sortering og kartlegging numeriske data . Excel har mange funksjoner som er tilgjengelige som utfører forskjellige handlinger brukeren kan kreve. Når den innebygde funksjonaliteten unnlater å møte brukerens krav, inkludert programmering språk, Visual Basic for Applications ( VBA ) , kan brukes i stedet. VBA er en robust programmeringsspråk tilgjengelig for operasjoner som blir utført fra innsiden av regneark . En operasjon som sletter rader basert på tilpassede krav er en perfekt plass for VBA. Du trenger
Microsoft Excel
Vis flere instruksjoner
en

Åpne Microsoft Excel-regneark som du ønsker å slette hver tredje rad.
2

Legge til data i første tolv rader i regnearket i kolonne " A."
3

Åpne menyen for makroer ved å trykke på "Alt" og " F8 " ; . " . Create" nøkler
4

Enter " Deletethree " i Makro -boksen , og klikk på knappen merket
5

Lim inn følgende kode under teksten " Sub Deletethree " : en

' Dim variables.Y = 1I = 1

Set xRng = Selection

' Loop for hver rad i selectionFor xCounter = 1 å xRng.Rows.Count
p Hvis Y = 3 Så

' ... slette en hel rad av cells.xRng.Cells ( i) . EntireRow.DeleteY = 1' Ellers .. . Else ' ... øke jeg etter en for å bla gjennom range.I = i + 1Y = Y + 1End Hvis

Neste xCounter
6

Lagre makro " Deletethree " ved å trykke " Ctrl" og " S "-tastene . Lukk vinduet "Microsoft Visual Basic " for å gå tilbake til Excel-programmet .
7

Marker cellene A1 til A12 i regnearket.
8

Trykk på " Alt" , og " F8 " for å åpne makroen menyen . Velg makro " Deletethree " og venstre - klikk på "Kjør "-knappen . Ved ferdigstillelse av makroen , er hver tredje rad fjernet.