Kā izmantot VBA citu paziņojumu? (ar piemēriem)

Satura rādītājs

Excel VBA IF cits paziņojums

Darblapā nav IF Else paziņojuma , un to var izmantot tikai VBA kodā, strādājot VBA, mēs varam nodrošināt nosacījumu, kas ir nosacījums If nosacījums, un, ja tas ir izpildīts noteikts instrukciju kopums, tas tiek izpildīts un, ja nosacījums neizdodas instrukcijai, tad tiek izpildīts pārējais paziņojums.

Runājot par loģiskajiem testiem, VBA neatšķiras. Tas darbojas tāpat kā parastajās darblapās. No visām loģiskajām funkcijām “IF” funkciju galvenokārt izmanto no partijas. Izmantojot IF, mēs varam veikt loģisku pārbaudi un pieņemt lēmumus, ja loģiskais tests ir apmierināts, kā arī pieņemt alternatīvus lēmumus, ja loģiskais tests nav apmierināts.

Zemāk ir IF Else nosacījuma sintakse.

Ja tad, ja loģiskais tests ir patiess, ja loģiskā pārbaude ir FALSE, beidziet IF

Kas ir VBA IF, tad cits paziņojums?

Kad piegādātais loģiskais tests ir FALSE, mums ir nepieciešams kāds alternatīvs uzdevums, ko izpildīt kā daļu no koda. Tātad, "JA VĒL" nozīmē, ja loģiskais tests ir VILTS, kas vēl ir jādara.

Lai labāk izprastu tālāk sniegto piemēru, rezultātu esam norādījuši kā “10 ir lielāks” tikai tad, ja loģiskais tests ir PATIESA. Tomēr FALSE loģiskajā rezultātā mēs varam sniegt alternatīvu rezultātu kā “10 ir mazāks”.

Tāpēc, kad ir iesniegti loģiskie testi un nākamajā rindiņā ierakstīts PATIESĀS daļas kods, ievadiet vārdu “ELSE”.

ELSE nozīmē, ja loģiskais tests nav PATIESA, mums ir nepieciešams rezultāts, jo “10 ir mazāks”.

Kods:

IF_Else_Example1 () Ja 10> 11 Tad MsgBox "10 ir lielāks" Cits MsgBox "10 ir mazāks" Beigas Ja End Sub

Tagad mūsu kods sniedz vismaz kādu no iepriekš minētajiem rezultātiem. Izpildiet kodu un skatiet rezultātu.

Tā kā esam piegādājuši alternatīvo rezultātu, ja loģiskā pārbaude ir FALSE, tas parādīja alternatīvo rezultātu kā “10 ir mazāks”, jo 10 ir mazāks nekā otrs skaitlis 11.

Piemērs

Piemēram, apskatiet tālāk minētos datus.

Izmantojot šos datus, mums jānonāk pie statusa, pamatojoties uz katra produkta “Izmaksu”. Lai saņemtu statusu zemāk, ir kritēriji.

Ja pašizmaksa ir> 50, statusam jābūt “ Dārgam ” vai arī statusam “ Nav dārgam ”.

Šeit mums jāpārbauda pašizmaksa, ti, loģiska pārbaude, vai pašizmaksa ir> 50 vai nav. Ja loģiskā pārbaude ir PATIESA, ti, pašizmaksa ir lielāka par 50, mums ir nepieciešams statuss kā “Dārgs”, un, ja loģiskā pārbaude ir FALSE, ti, pašizmaksa ir mazāka par 50, mums ir nepieciešams alternatīvs rezultāts "Lēts."

Labi, tagad uzrakstīsim kodu. Pirms tam nokopējiet un ielīmējiet iepriekš minēto tabulu Excel darblapā.

1. darbība: sāciet apakšprocedūru.

Apakšgrupa IF_ELSE_Piemērs2 () Beigu apakšgrupa

2. darbība. Deklarējiet mainīgo kā integer datu tipu.

Dim k kā vesels skaitlis

3. solis: Tā kā mums jāpārbauda vairāk nekā vienas šūnas vērtības, mums ir jāizmanto FOR VBA LOOP, lai apietu šūnas un pielietotu loģiku visām šūnām.

Mums ir nepieciešams, lai piemērotu loģiskās pārbaudes no 2. kārtas, līdz 8. th rindu, lai sāktu cilpas no 2 līdz 8.

Kods:

Par k = 2 līdz 8 Nākamais k

4. solis: Šajā lokā mums jāveic loģiskais tests. Tātad atveriet IF paziņojumu un atlasiet pirmo šūnu, izmantojot rekvizītu CELLS.

Kods:

Ja šūnas (k, 2). Vērtība> 50 Tad

Šūnas (k, 2) nozīmē rindu (k vērtību) un 2. kolonnu.

5. solis: ja šīs šūnas vērtība ir> 50, nākamās kolonnas šūnā rezultāts ir nepieciešams kā “Dārgs”. Tātad kods būs -

Kods:

Šūnas (k, 3). Vērtība = "Dārga"

6. darbība: ja pārbaude nav PATIESA, mums ir vajadzīgi ELSE paziņojuma rezultāti, ti, “Nav dārgs”.

Kods:

Apakšsadaļa IF_ELSE_Example2 () Dim k kā vesels skaitlis k = 2 līdz 8, ja šūnas (k, 2). Vērtība> 50, tad šūnas (k, 3). Vērtība = "Dārga" Citas šūnas (k, 3). Vērtība = "Nav Dārgs "Beigt, ja nākamais k Beigt apakš

Šis kods būs cilpa ar no 2 nd līdz 8.-rindu pārbauda numurus un nonāktu pie rezultāta, pamatojoties uz pašizmaksu.

Šādi mēs varam izmantot If-Else, lai iegūtu alternatīvus rezultātus.

Atceramās lietas

  • Cits paziņojums ir paredzēts FALSE loģiskam testam.
  • Ja vēlaties Excel programmā piemērot vairāk nekā divus loģiskus testus, mums jāizmanto ELSE IF priekšraksts.
  • Ja uzdevums tiek izpildīts vairāk nekā vienai šūnai, mums jāizmanto cilpas.
  • Ja ar citu paziņojumu var pārbaudīt tikai vienu loģisko pārbaudi.

Interesanti raksti...