VBA හි කොන්දේසි ප්රකාශ

Excel VBA හි භාවිතා වන වඩාත්ම වැදගත් කොන්දේසි ප්රකාශයන් වන්නේ ප්රකාශයන් වේ එසේ නම් ... и නඩුව තෝරන්න. මෙම ප්රකාශන දෙකම කොන්දේසි එකක් හෝ කිහිපයක් පරීක්ෂා කරන අතර, ප්රතිඵලය අනුව, විවිධ ක්රියා සිදු කරයි. අපි මෙම කොන්දේසි සහිත ක්‍රියාකරුවන් දෙදෙනා ගැන වඩාත් විස්තරාත්මකව ඊළඟට කතා කරමු.

විෂුවල් බේසික් හි ප්‍රකාශය "එසේ නම්...එසේ නම්"

ක්රියාකරු එසේ නම් ... තත්ත්වය පරීක්ෂා කරන අතර, එය සත්‍ය නම් (සත්‍ය), එවිට නියමිත ක්‍රියා මාලාව සිදු කරනු ලැබේ. කොන්දේසිය අසත්‍ය නම් සිදු කළ යුතු ක්‍රියා මාලාවක් ද එයට අර්ථ දැක්විය හැක.

ක්රියාකරු සින්ටැක්ස් එසේ නම් ... මෙවැනි:

If Условие1 Then

   Действия в случае, если выполняется Условие1

ElseIf Условие2 Then

   Действия в случае, если выполняется Условие2

Else

   Действия в случае, если не выполнено ни одно из Условий

End If

මෙම ප්රකාශනයේ, මූලද්රව්ය වෙනත් නම් и වෙන කොන්දේසි ක්‍රියාකරු අවශ්‍ය නැතිනම් ඒවා මඟ හැරිය හැක.

පහත දැක්වෙන්නේ ක්රියාකරු භාවිතා කරන උදාහරණයක් එසේ නම් ... සක්‍රිය සෛලයේ පිරවුම් වර්ණය එහි ඇති අගය අනුව වෙනස් වේ:

ActiveCell.Value < 5 නම් ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 එවිට ActiveCell.Interior 49407. вается в оранжевый цвет Else ActiveCell.Interior.Color = 255 'අයිචිකා окрашивается в красный цвет අවසානය නම්

කොන්දේසිය සත්‍ය වූ වහාම, කොන්දේසි සහිත ප්‍රකාශය ක්‍රියාත්මක කිරීම නවතා දමන බව සලකන්න. එබැවින්, විචල්යයේ අගය නම් ActiveCell 5 ට වඩා අඩු, එවිට පළමු කොන්දේසිය සත්‍ය වන අතර සෛලය කොළ පැහැයක් ගනී. ඉන් පසුව, ප්රකාශය ක්රියාත්මක කිරීම එසේ නම් ... බාධා ඇති වන අතර අනෙකුත් කොන්දේසි පරීක්ෂා නොකෙරේ.

VBA හි කොන්දේසි සහිත ක්‍රියාකරු භාවිතා කිරීම ගැන තව දැනගන්න එසේ නම් ... Microsoft Developer Network හි සොයා ගත හැක.

විෂුවල් බේසික් හි "නඩුව තෝරන්න" ප්‍රකාශය

ක්රියාකරු නඩුව තෝරන්න ක්රියාකරුට සමානයි එසේ නම් ... එය කොන්දේසියේ සත්‍යය ද පරීක්ෂා කරන අතර, ප්‍රතිඵලය මත පදනම්ව, විකල්පයන්ගෙන් එකක් තෝරා ගනී.

ක්රියාකරු සින්ටැක්ස් නඩුව තෝරන්න මෙවැනි:

Select Case Выражение

Case Значение1

   Действия в случае, если результат Выражения соответствует Значению1

Case Значение2

   Действия в случае, если результат Выражения соответствует Значению2

...

Case Else

   Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения

End Select

මූලද්රව්ය වෙනත් නඩුව අවශ්ය නොවේ, නමුත් අනපේක්ෂිත අගයන් හැසිරවීම සඳහා නිර්දේශ කරනු ලැබේ.

පහත උදාහරණයේ, ඉදිකිරීම් භාවිතා කිරීම නඩුව තෝරන්න එහි ඇති අගය අනුව වත්මන් කොටුවේ පිරවුම් වර්ණය වෙනස් කරයි:

Case ActiveCell තෝරන්න.Value Case යනු <= 5 ActiveCell.Interior.Color = 65280 'අංක 6, 7, 8, 9 ActiveCell.Interi = 49407 10 වන නඩුව ActiveCell.Interior වෙත පිවිසෙන්න. වර්ණය = 65535 'චිත්‍රපටය සමඟින් ඡායාරුප 11 සිට 20 දක්වා ActiveCell.Interior.Color = 10498160 Cell.Interior.Color = 255 'අවසානය තෝරන්න අවසන් කරන්න

ඉහත උදාහරණයෙන් ඔබට විවිධ ආකාරවලින් මූලද්‍රව්‍යයක් සඳහා අගයක් සැකසිය හැකි ආකාරය පෙන්වයි. නඩුව ඉදිකිරීම් වලදී නඩුව තෝරන්න. මේ ක්‍රම වේ:

නඩුව වේ <= 5මේ අනුව, මූල පදය භාවිතා කිරීම නඩුව වේ අගය තෘප්තිමත් වේද යන්න ඔබට පරීක්ෂා කළ හැක ප්‍රකාශන පෝරමයේ තත්ත්වය <= 5.
නඩුව 6, 7, 8, 9මේ ආකාරයෙන් ඔබට අගය ගැලපේදැයි පරීක්ෂා කළ හැකිය ප්‍රකාශන ලැයිස්තුගත අගයන්ගෙන් එකක් සමඟ. ලැයිස්තුගත අගයන් කොමාවකින් වෙන් කර ඇත.
නඩුව 10මෙම අගය ගැලපෙන්නේ දැයි පරීක්ෂා කරයි ප්‍රකාශන දී ඇති අගයක් සමඟ.
නඩුව 11 ඒක තමයි 20මේ අනුව, අගය තෘප්තිමත් වේද යන්න පරීක්ෂා කිරීමට ඔබට ප්‍රකාශනයක් ලිවිය හැකිය ප්‍රකාශන පෝරමයේ තත්ත්වය 11 සිට 20 කිරීමට ("11<=අගය<=20" අසමානතාවයට සමාන වේ).
වෙනත් නඩුවමේ වගේ, මූල පදය භාවිතා කරන්න වෙන, අගය නම් නඩුව සඳහා ක්රියා දක්වනු ලැබේ ප්‍රකාශන ලැයිස්තුගත කර ඇති කිසිදු විකල්පයකට නොගැලපේ නඩුව.

එක් කොන්දේසියක් සොයාගත් වහාම, අනුරූප ක්රියාවන් සිදු කරනු ලබන අතර ව්යුහය පිටවෙයි. නඩුව තෝරන්න. එනම්, ඕනෑම අවස්ථාවක, ලැයිස්තුගත ශාඛා වලින් එකක් පමණක් ක්රියාත්මක කරනු ලැබේ. නඩුව.

VBA ප්‍රකාශයේ ක්‍රියාකාරිත්වය පිළිබඳ වැඩි විස්තර නඩුව තෝරන්න Microsoft Developer Network හි සොයා ගත හැක.

ඔබමයි