Vba- အမှားကြောင့် sub ကို ဘယ်လိုထွက်မလဲ။

အမှားအယွင်းတစ်ခုကြုံလာသောအခါတွင် လုပ်ငန်းစဉ်ခွဲတစ်ခုမှထွက်ရန် VBA တွင် Exit Sub ထုတ်ပြန်ချက်ကို သင်အသုံးပြုနိုင်သည်။

ဤဖော်ပြချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။

 Sub DivideValues()

Dim i As Integer
On Error GoTo ErrorMessage

For i = 1 To 10
    Range(" C " & i) = Range(" A " & i) / Range(" B " & i)
Next i
    
Exit Sub

Error Message:
    MsgBox “ An Error Occurred ”
    Exit Sub
    
End Sub

ဤအထူးမက်ခရိုသည် အပိုင်းအခြား A1:A10 အတွင်းရှိ တန်ဖိုးတစ်ခုစီကို အပိုင်းအခြား B1:B10 ရှိ ဆက်စပ်တန်ဖိုးဖြင့် ပိုင်းခြားရန် ကြိုးပမ်းသည်။

အမှားအယွင်းတစ်ခုဖြစ်ပေါ်ပါက (ဥပမာ၊ ကျွန်ုပ်တို့သည် သုညဖြင့်ခွဲရန်ကြိုးစားနေသည်)၊ ထို့နောက်တွင် Error GoTo ထုတ်ပြန်ချက်တွင် VBA သည် ErrorMessage ကို ဝင်ရောက်ရန် VBA အားပြောသည်၊ ၎င်းသည် error တစ်ခုဖြစ်ပွားပြီး Exist Sub ကို အသုံးပြု၍ လုပ်ငန်းစဉ်ခွဲကိုအဆုံးသတ်ရန် မက်ဆေ့ဘောက်စ်တစ်ခုထုတ်ရန်ပြောသည် . ထုတ်ပြန်ချက်။ထုတ်ပြန်ချက်

အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။

ဥပမာ- VBA တွင် အမှားအယွင်းရှိပါက အပိုင်းခွဲတစ်ခု မည်သို့တည်ရှိမည်နည်း။

ကော်လံ A နှင့် B တွင် အောက်ပါတန်ဖိုးများစာရင်းရှိသည်ဆိုပါစို့။

ယခု ကျွန်ုပ်တို့သည် ကော်လံ A တွင် တန်ဖိုးတစ်ခုစီကို ကော်လံ B ရှိ သက်ဆိုင်ရာတန်ဖိုးဖြင့် ပိုင်းခြားပြီး ကော်လံ C တွင် ရလဒ်များကိုပြသရန် အောက်ပါ macro ကို ဖန်တီးသည်ဆိုပါစို့။

 Sub DivideValues()

Dim i As Integer

For i = 1 To 10
    Range(" C " & i) = Range(" A " & i) / Range(" B " & i)
Next i
    
End Sub

ဤ macro ကို ကျွန်ုပ်တို့ လုပ်ဆောင်သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ အမှားကို လက်ခံရရှိသည် ။

Excel စာရွက်၏ စတုတ္ထတန်းတွင် သုညဖြင့် ခွဲရန် ကြိုးစားသောကြောင့် ဤအမှားကို လက်ခံရရှိခြင်းဖြစ်သည်။

အကယ်၍ ကျွန်ုပ်တို့သည် ဤအမှားအယွင်းဖြစ်ပေါ်သည့်အခါ လုပ်ငန်းစဉ်ခွဲမှထွက်လိုပါက၊ ကျွန်ုပ်တို့သည် အောက်ပါအတိုင်း Exit Sub ထုတ်ပြန်ချက်ကို အသုံးပြုနိုင်ပါသည်။

 Sub DivideValues()

Dim i As Integer
On Error GoTo ErrorMessage

For i = 1 To 10
    Range(" C " & i) = Range(" A " & i) / Range(" B " & i)
Next i
    
Exit Sub

Error Message:
    MsgBox “ An Error Occurred ”
    Exit Sub
    
End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါ၊ sub-procedure သည် error တစ်ခုမကြုံတွေ့မီ ဖြစ်နိုင်ချေရှိသော ပိုင်းခြားမှုပြဿနာအားလုံးကို လုပ်ဆောင်ပေးသည်၊ ထို့နောက် error တစ်ခုဖြစ်ပွားပြီး VBA သည် sub-procedure တွင်ရိုးရှင်းစွာတည်ရှိနေကြောင်း မက်ဆေ့ချ်ဘောက်စ်တစ်ခုပေါ်လာပါသည်။

မှတ်ချက် – VBA တွင် Exit ထုတ်ပြန်ချက်၏ စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာနိုင်သည်။

ထပ်လောင်းအရင်းအမြစ်များ

အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-

VBA ကို အသုံးပြု၍ ဖိုင်တွဲများဖန်တီးနည်း
VBA သုံးပြီး folder တွေကို ဘယ်လိုဖျက်မလဲ။
VBA သုံးပြီး ဖိုင်တွေကို ဘယ်လိုဖျက်မလဲ။