Më poshtë është një listë e dhjetë strukturave më të përdorura të kontrollit të programimit Excel VBA. Përfshirë është një shembull i thjeshtë i secilës strukturë kontrolli dhe një përshkrim i shkurtër se kur do ta përdorni atë strukturë.
Për - Tjetra
I dobishëm për të kaluar nëpër një grup.
Shuma e grupit = 0
Për i = 1 deri në 10
ArraySum = ArraySum + MyArray(i)
Tjetra i
Për secilin - Tjetra
I dobishëm për të kaluar nëpër një koleksion ose një varg qelizash.
Zgjedhja Shuma = 0
Për çdo qelizë në përzgjedhje
SelectionSum = SelectionSum + qeliza.Vlera
Qeliza tjetër
Bëj – Loop Deri
Lloko derisa të plotësohet një kusht.
Rreshti = 0
Bëni
Rreshti = Rreshti + 1
Loop Deri Cells (Rresht, 1). Vlera = "
MsgBox "Qeliza e parë bosh është në Rresht " & Rresht
Do while – Loop
Lloko ndërkohë që një kusht është i vërtetë.
Rreshti = 1
Bëj ndërsa qelizat (rreshti, 1) <> "
Rreshti = Rreshti + 1
Lak
MsgBox "Qeliza e parë bosh është në Rresht " & Rresht
Nese atehere
Bëni diçka nëse një kusht është i vërtetë. Shkruar si një deklaratë e vetme.
Nëse x = 1, atëherë y = 1
Nëse – Pastaj – Fundi Nëse
Bëni diçka nëse një kusht është i vërtetë. Mund të përdorë deklarata të shumta.
Nëse x = 1 Atëherë
y = 1
z = 1
Fundi Nëse
Nëse - Atëherë - Përndryshe
Bëj diçka nëse një kusht është i vërtetë; përndryshe, bëj diçka tjetër. Shkruar si një deklaratë e vetme.
Nëse x = 1, atëherë y = 1 tjetër y = 0
Nëse – Pastaj – Tjetër – Fundi Nëse
Bëj diçka nëse një kusht është i vërtetë; përndryshe, bëj diçka tjetër. Mund të përdorë deklarata të shumta.
Nëse x = 1 Atëherë
y = 1
Z = 1
Përndryshe
y = 0
Z = 0
Fundi Nëse
Zgjidhni Rastin
Bëni një nga disa gjëra, në varësi të një gjendjeje.
Zgjidhni rastin x
Rasti 1
y = 1
Z = 1
Rasti është > 1
y = 2
Z = 2
Rasti tjetër
y = 0
Z = 0
Fund Zgjidh
Shkoni
Shko te një deklaratë e etiketuar. Kjo përdoret kryesisht për trajtimin e gabimeve.
Në gabim GoTo Oops
'[më shumë kod shkon këtu]
Dilni Nën
Mos:
MsgBox "Ndodhi një gabim"