Vba- "အလွတ်မဟုတ်ရင်" ဘယ်လိုသုံးမလဲ။
ဆဲလ်တစ်ခုဗလာမဟုတ်ကြောင်းစစ်ဆေးရန် VBA တွင် Not IsEmpty ကို သုံးနိုင်သည်။
ဤအရာသည် မက်ခရိုတစ်ခုတွင် ဤ syntax ကို သင်မည်သို့သုံးနိုင်ပုံကို ဥပမာတစ်ခုဖြစ်သည်။
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Not Empty ”
Else
Result = “ Cell is Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
ဤဥပမာသည် အပိုင်းအခြား A2:A13 ရှိ ဆဲလ်တစ်ခုစီကို ဗလာမဟုတ်ကြောင်း စစ်ဆေးပြီး အပိုင်းအခြား B2:B13 ရှိ ကိုက်ညီသည့်ဆဲလ်တစ်ခုစီအတွက် “ ဆဲလ်သည် ဗလာမဟုတ်ပါ” သို့မဟုတ် “ ဆဲလ်သည် ဗလာဖြစ်နေသည်” ကို ရိုက်နှိပ်သည်။
အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။
ဥပမာ- VBA တွင် “အလကားမဟုတ်လျှင်” ကိုမည်သို့သုံးရမည်နည်း။
Excel တွင် အောက်ဖော်ပြပါ ဘတ်စကတ်ဘောအသင်းအမည်များ ရှိသည်ဆိုပါစို့။
A2:A13 အပိုင်းအခြားရှိ ဆဲလ်တစ်ခုစီသည် ဗလာမဟုတ်ကြောင်း စစ်ဆေးလိုပြီး အပိုင်းအခြား B2:B8 ရှိ သက်ဆိုင်ရာဆဲလ်များတွင် ရလဒ်များကို ပြသလိုသည်ဆိုပါစို့။
ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Not Empty ”
Else
Result = “ Cell is Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။
ကော်လံ B သည် ကော်လံ A ရှိ ဆက်စပ်ဆဲလ်တစ်ခုစီသည် ဗလာဖြစ်၊
တန်ဖိုးသည် ကော်လံ A တွင် ဗလာမပါပါက ကော်လံ B တွင် အသင်းအမည်ကို ရိုးရိုးပြန်ပေးရန်အတွက်လည်း အောက်ပါ macro ကို အသုံးပြုနိုင်သည်။
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = Range(" A " & i).Value
Else
Result = " Empty "
End If
Range(" B " & i) = Result
Next i
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။
ကော်လံ B သည် ဆဲလ်အလွတ်မဟုတ်ပါက ကော်လံ A တွင် အသင်းအမည်ကို ယခု ပြန်ပေးသည်။
မှတ်ချက် – VBA IsEmpty နည်းလမ်းအတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာတွေ့နိုင်ပါသည်။
ထပ်လောင်းအရင်းအမြစ်များ
အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-
VBA- စာကြောင်းတစ်ခုရှိ ဇာတ်ကောင်များ၏ ဖြစ်ပေါ်မှုကို ရေတွက်နည်း
VBA- စာကြောင်းတစ်ကြောင်းတွင် အခြားစာကြောင်းပါရှိမရှိ စစ်ဆေးနည်း
VBA- ဆဲလ်တွင် “If” အတွက် ဖော်မြူလာတစ်ခု