Seuraavassa on luettelo kymmenestä yleisimmin käytetystä Excel VBA -ohjelmoinnin ohjausrakenteesta. Mukana on yksinkertainen esimerkki kustakin ohjausrakenteesta ja lyhyt kuvaus siitä, milloin käytät kyseistä rakennetta.
For – Seuraava
Hyödyllinen taulukon läpi kiertämiseen.
ArraySum = 0
Jos i = 1 - 10
ArraySum = ArraySum + MyArray(i)
Seuraavaksi minä
Jokaiselle – seuraavaksi
Hyödyllinen kokoelman tai solualueen läpikäymiseen.
Valintasumma = 0
Jokaiselle valinnassa olevalle solulle
SelectionSum = SelectionSum + solu.Arvo
Seuraava solu
Tee – Loop asti
Kierrä, kunnes ehto täyttyy.
Rivi = 0
Tehdä
Rivi = rivi + 1
Silmukka soluihin (rivi, 1). Arvo = "
MsgBox "Ensimmäinen tyhjä solu on rivillä" & rivi
Do While – Loop
Silmukka kun ehto on tosi.
Rivi = 1
Tee kun solut (rivi, 1) <> "
Rivi = rivi + 1
Silmukka
MsgBox "Ensimmäinen tyhjä solu on rivillä" & rivi
Jos sitten
Tee jotain, jos ehto on totta. Kirjoitettu yhtenä lauseena.
Jos x = 1, niin y = 1
Jos – sitten – Lopeta jos
Tee jotain, jos ehto on totta. Voi käyttää useita lausuntoja.
Jos x = 1 Sitten
y = 1
z = 1
Loppu Jos
Jos – Sitten – Muuta
Tee jotain, jos ehto on totta; muuten tee jotain muuta. Kirjoitettu yhtenä lauseena.
Jos x = 1, niin y = 1 Muuten y = 0
Jos – Sitten – Muutoin – Lopeta Jos
Tee jotain, jos ehto on totta; muuten tee jotain muuta. Voi käyttää useita lausuntoja.
Jos x = 1 Sitten
y = 1
Z = 1
Muu
y = 0
Z = 0
Loppu Jos
Valitse Case
Tee jokin useista olosuhteista riippuen.
Valitse tapaus x
Tapaus 1
y = 1
Z = 1
Tapaus on > 1
y = 2
Z = 2
Tapaus Muu
y = 0
Z = 0
Lopeta valinta
Mene
Siirry merkittyyn lausuntoon. Tätä käytetään lähinnä virheiden käsittelyyn.
On Error GoTo Oho
'[lisää koodia tulee tänne]
Poistu Subista
Oho:
MsgBox "Tapahtui virhe"