فهرست مطالب
یکی از سودمندترین کاربردهای اکسل VBA در زندگی روزمره ما این است که می توانیم بررسی کنیم که آیا فایلی در دستگاه ما وجود دارد یا از آن استفاده نمی کنیم. در این مقاله، من به شما نشان خواهم داد که چگونه می توانید با استفاده از Excel VBA فایلی را بررسی کنید که آیا فایلی وجود دارد یا نه.
کد VBA برای بررسی وجود یا عدم وجود فایل (سریع مشاهده)
5895
دانلود کتاب تمرین
این کتاب تمرین تمرینی را دانلود کنید تا هنگام خواندن این مقاله تمرین کنید.
بررسی VBA اگر فایلی وجود دارد.xlsm
مروری بر کد VBA برای بررسی وجود یا عدم وجود فایل (تحلیل گام به گام)
پس بدون تأخیر بیشتر به بحث اصلی امروز خود می رویم. ما کد VBA را گام به گام تجزیه می‌کنیم تا نحوه بررسی وجود یا نبودن یک فایل در رایانه‌هایمان را بیاموزیم.
⧪ مرحله 1: درج موارد ضروری ورودی
در همان ابتدای کد، باید ورودی لازم را در آن وارد کنیم. تنها یک ورودی در این کد مورد نیاز است و آن نام فایلی است که به دنبال آن هستیم. نام کامل فایل (همراه با دایرکتوری مرتبط) را وارد کنید.
9286
⧪ مرحله 2: استخراج نام فایل با تابع VBA Dir
بعد، از یک ترفند کوچک استفاده می کنیم. ما از VBA Dir تابع برای استخراج نام فایل استفاده خواهیم کرد. اگر چنین فایلی وجود نداشته باشد، تابع Dir یک رشته تهی را برمی گرداند.
2671
⧪مرحله 3: بررسی وجود فایل با استفاده از یک بلوک If
این مهمترین مرحله است. قبلاً گفته بودیم که اگر هیچ فایلی با نام داده شده وجود نداشته باشد، تابع Dir یک رشته تهی را برمی‌گرداند. ما از این ویژگی در یک If-block استفاده می کنیم تا بررسی کنیم که آیا فایل وجود دارد یا نه.
6484
بنابراین VBA کد خواهد بود:
⧭ کد VBA:
4343
⧭ خروجی:
کد را اجرا کنید. در رایانه من، یک کادر پیام نمایش داده می شود، "فایل وجود دارد" ، زیرا در واقع در دستگاه من وجود دارد.
در دستگاه شما، ممکن است خروجی بسته به اینکه فایل باشد متفاوت باشد. وجود دارد یا خیر.
بیشتر بخوانید: Excel VBA: بررسی کنید آیا برگه ای وجود دارد (2 روش ساده)
توسعه یک ماکرو برای بررسی وجود یا عدم وجود طیف وسیعی از فایل ها با استفاده از Excel VBA
در اینجا ما مجموعه ای از داده ها را در یک کاربرگ اکسل داریم که حاوی نام برخی از فایل ها است. با دایرکتوری های موجود در محدوده B4:B8 .
هدف ما ایجاد یک ماکرو است که بنویسد Exist/Doesn't Exist در کنار هر یک از آنها پس از بررسی وجود یا عدم وجود آنها در رایانه.
⧪ مرحله 1: باز کردن پنجره VBA
ALT + را فشار دهید. F11 روی صفحه کلید خود برای باز کردن پنجره Visual Basic .
⧪ مرحله 2: قرار دادن یک ماژول جدید
به درج > ماژول در نوار ابزار. روی Module کلیک کنید. یک ماژول جدید به نام Module1 (یا هر چیز دیگری بسته به سابقه گذشته شما) باز می شود.
⧪ مرحله 3: قرار دادن کد VBA
این مهمترین مرحله است. کد VBA زیر را در ماژول وارد کنید.
⧭ کد VBA:
8445
⧪ مرحله 5: اجرای کد
روی ابزار Run Sub / UserForm از نوار ابزار بالا کلیک کنید.
کد اجرا خواهد شد. و برای فایل‌های موجود "موجود" و برای فایل‌هایی که وجود ندارند "وجود ندارد" دریافت خواهید کرد.
بیشتر بخوانید: چگونه بررسی کنیم که آیا مقدار در محدوده در اکسل وجود دارد (8 روش)
نتیجه گیری
بنابراین، این فرآیند ایجاد یک ماکرو برای ارسال ایمیل از اکسل با پیوست است. آیا هیچ سوالی دارید؟ راحت باشید و از ما سوال کنید. و فراموش نکنید که برای پست ها و به روز رسانی های بیشتر از سایت ما ExcelWIKI دیدن کنید.
