Tabela e përmbajtjes
Në këtë artikull, unë do t'ju tregoj se si mund të përdorni një deklaratë If në VBA në Excel bazuar në një vlerë qelize.
Excel VBA: Nëse deklarata e bazuar në vlerën e qelizës (Pamje e shpejtë)
1782
Shkarko librin e punës praktike
Shkarko këtë praktikë fletore pune për të ushtruar ndërkohë që jeni duke lexuar këtë artikull.
Nëse deklarata e bazuar në vlerën e qelisë.xlsm
Nëse deklarata e bazuar në vlerën e qelisë në Excel VBA
Këtu kemi një fletë pune që përmban emrat dhe notat të disa nxënësve të një shkolle në një provim.
Objektivi ynë është të mësojmë se si të përdorim deklaratën If në Excel VBA bazuar në një vlerë qelize nga ky grup të dhënash.
1 . Nëse deklarata bazohet në vlerën e qelizës së një qelize të vetme në Excel VBA
Së pari, do të mësojmë të përdorim një deklaratë If bazuar në vlerën e një qelize të vetme.
Për shembull, le të përpiqemi të shohim nëse Natalia Austin e kaloi provimin apo jo, domethënë nëse shenja në qelizën C3 është më e madhe se 40 apo jo.
Kollona D përmban rezultatin e nxënësve. Kjo do të thotë, nëse qeliza C3 përmban një shenjë më të madhe se 40, qeliza D3 do të përmbajë “Kaluar” . Përndryshe, ai do të përmbajë “Dështoi” .
Ne do të përdorim një objekt VBA Range për të krijuar këtë deklaratë If bazuar në vlerën e qelizës.
Kodi VBA për këtë do të jetë:
⧭ VBAKodi:
2563
⧭ Output:
Ekzekutoni kodin nga Run Sub / UserForm mjet në VBA bari i veglave.
Do të bëjë që qeliza D3 të përmbajë “Dështoi” , pasi shenja në qelizën C3 është më e vogël se 40 ( 32 ).
2. Nëse deklarata e bazuar në vlerat e një diapazoni qelizash në Excel VBA
Mund të përdorni gjithashtu deklaratën If bazuar në vlerat e një sërë qelizash në VBA . Ju mund të përdorni një for-loop për këtë qëllim.
Për shembull, këtu mund të gjejmë rezultatin e të gjithë studentëve me një kod të vetëm. Ne do të përsërisim përmes një for-loop që do të kontrollojë të gjitha qelizat në intervalin C3:C12 dhe do të kthejë një rezultat përkatës, “Kaluar” ose "Dështoi" .
Kodi VBA për këtë do të jetë:
⧭ Kodi VBA:
9343
⧭ Output:
Ekzekutoni kodin nga mjeti Run Sub / UserForm në VBA bari i veglave. Do të kthehet "Kaluar" për notat që janë më të mëdha se 40 dhe "Dështoi" për ato që janë më pak se n 40 .
Gjërat për t'u mbajtur mend
Këtu kam treguar një deklaratë If me një kusht të vetëm. Por nëse dëshironi, mund të përdorni kushte të shumta brenda një deklarate If .
Nëse përdorni OR shkruani kushte të shumta, bashkojini ato me një OR .
Dhe nëse përdorni AND shkruani kushte të shumta, bashkojini ato me një AND .
Për shembull, për të kontrolluar nëse shenja në qelizën B3 është më e madhe se 40 dhe më e vogël se 50 ose jo, përdorni:
8827