Vba ကို အသုံးပြု၍ ဖိုင်ရှိမရှိ စစ်ဆေးနည်း (ဥပမာနှင့်အတူ)

သီးခြားဖိုင်တစ်ခုရှိမရှိ စစ်ဆေးရန် VBA ရှိ Dir လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်သည်။

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

 SubCheckFileExists ()

'ask user to type path to file
InputFile = InputBox(" Check if this file exists: ")

'check if file exists and output results to message box
If Dir(InputFile) <> "" Then
    MsgBox “ This File Exists ”
Else
    MsgBox “ This File Does Not Exist ”
End If

End Sub

ဤ macro သည် အသုံးပြုသူရှိမရှိ စစ်ဆေးရန် ဖိုင်တစ်ခုသို့ လမ်းကြောင်းအပြည့်အစုံကို ရိုက်ထည့်နိုင်သည့် input box တစ်ခုကို ဖန်တီးပေးလိမ့်မည်။

အသုံးပြုသူသည် ဖိုင်လမ်းကြောင်းထဲသို့ ဝင်သည်နှင့်တစ်ပြိုင်နက်၊ Macro သည် ဖိုင်ရှိမရှိကို ညွှန်ပြသည့် မက်ဆေ့ဘောက်စ်တစ်ခု ထုတ်ပေးလိမ့်မည်။

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

ဥပမာ- VBA သုံးပြီး ဖိုင်ရှိမရှိ စစ်ဆေးပါ။

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

C:\Users\bob\Documents\current_data

ဤဖိုင်တွဲတွင် CSV ဖိုင်သုံးခုပါရှိသည်-

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

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

 SubCheckFileExists ()

'ask user to type path to file
InputFile = InputBox(" Check if this file exists: ")

'check if file exists and output results to message box
If Dir(InputFile) <> "" Then
    MsgBox “ This File Exists ”
Else
    MsgBox “ This File Does Not Exist ”
End If

End Sub

ဒီ macro ကို run ပြီးတာနဲ့ file လမ်းကြောင်းကို ရိုက်ထည့်နိုင်တဲ့ input box ပေါ်လာပါတယ်။

soccer_data.csv ဖိုင်၏ လမ်းကြောင်း အပြည့်အစုံကို ကျွန်ုပ်တို့ ထည့်သွင်းပါမည်-

OK ကိုနှိပ်လိုက်သည်နှင့်၊ ကျွန်ုပ်တို့သတ်မှတ်ထားသော folder ထဲတွင် ဖိုင်ရှိမရှိကို ပြောပြမည့် message box ပေါ်လာပါမည်။

မက်ဆေ့ချ်ဘောက်စ်က ဖိုင်ရှိတယ်ဆိုတာကို ပြောပြတယ်။

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

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

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

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