Vba ကို အသုံးပြု၍ ဖိုင်များကို ဖျက်နည်း (ဥပမာများဖြင့်)


သီးခြားဖိုင်တွဲတစ်ခုရှိ Excel ဖိုင်တစ်ခုကို ဖျက်ရန် VBA တွင် Kill ထုတ်ပြန်ချက်ကို အသုံးပြုနိုင်သည်။

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

 SubDeleteFile ()

    On Error Resume Next
    Kill "C:\Users\Bob\Desktop\My_Data\soccer_data.xlsx"
    On Error GoTo 0

End Sub

ဤ Macro သည် အောက်ပါဖိုင်တွဲတွင်ရှိသော soccer_data.xlsx ဟုခေါ်သော Excel ဖိုင်ကို ဖျက်လိုက်သည်-

C:\Users\Bob\Desktop\My_Data

On Error Resume Next line တွင် error တစ်ခုဖြစ်ပွားပြီး ဖိုင်ကိုရှာမတွေ့ပါက error message ကိုပြသသင့်သည်ဟု VBA အားပြောပြသည်။

ထို့နောက် ကျွန်ုပ်တို့သည် အမှားမက်ဆေ့ချ်များကို မူရင်းဆက်တင်များသို့ ပြန်လည်သတ်မှတ်ရန် On Error GoTo 0 ကို အသုံးပြုသည်။

ဖိုင်ကို ရှာမတွေ့ပါက အမှားအယွင်း မက်ဆေ့ချ်ကို ပြသလိုပါက၊ ဤစာကြောင်းနှစ်ခုကို ကုဒ်မှ ဖယ်ရှားလိုက်ပါ။

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

ဥပမာ- VBA ကိုသုံးပြီး ဖိုင်တစ်ခုကို ဖျက်ပါ။

ကျွန်ုပ်တို့တွင် Excel ဖိုင်သုံးခုပါရှိသော အောက်ပါ folder ရှိသည်ဆိုပါစို့။

soccer_data.xlsx ဟုခေါ်သောဖိုင်ကိုဖျက်ရန် VBA ကိုအသုံးပြုလိုသည်ဆိုပါစို့။

ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။

 SubDeleteFile ()

    On Error Resume Next
    Kill "C:\Users\Bob\Desktop\My_Data\soccer_data.xlsx"
    On Error GoTo 0

End Sub

ဒီ macro ကို run ပြီး folder ကို ပြန်ဖွင့်ပြီးတာနဲ့ soccer_data.xlsx လို့ခေါ်တဲ့ ဖိုင်ကို ဖျက်လိုက်ပါပြီ-

အခြားဖိုင်အားလုံးသည် ဖိုဒါတွင် ကျန်ရှိနေသည်။

ဖိုင်မရှိပါက error message ကိုပြသလိုပါက အောက်ပါ macro ကို အသုံးပြုနိုင်ပါသည်။

 SubDeleteFile ()

    Kill "C:\Users\Bob\Desktop\My_Data\soccer_data.xlsx"

End Sub

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

soccer_data.xlsx ဖိုင်ကို ဖျက်ပြီးဖြစ်ပြီး ဖိုင်တွဲတွင် မရှိတော့သောကြောင့် ကျွန်ုပ်တို့သည် ဤအမှားသတင်းကို လက်ခံရရှိခြင်းဖြစ်သည်။

မှတ်ချက်

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

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

VBA- အလုပ်စာအုပ်တွင် စာရွက်အရေအတွက်ကို ရေတွက်နည်း
VBA- အခြားအလုပ်စာအုပ်မှ ဒေတာကို မည်သို့ထုတ်ယူမည်နည်း။
VBA- အမည်တွင် သီးခြားစာသားပါရှိလျှင် စာရွက်တစ်ရွက်ကို မည်သို့ဖျက်မည်နည်း။

မှတ်ချက်တစ်ခုထည့်ပါ။

သင့် email လိပ်စာကို ဖော်ပြမည် မဟုတ်ပါ။ လိုအပ်သော ကွက်လပ်များကို * ဖြင့်မှတ်သားထားသည်