جدول المحتويات
أحد الاستخدامات الأكثر فائدة لبرنامج Excel VBA في حياتنا اليومية هو أنه يمكننا التحقق من وجود ملف على جهازنا أو عدم استخدامه. في هذه المقالة ، سأوضح لك كيف يمكنك التحقق مما إذا كان الملف موجودًا أم لا على أجهزة الكمبيوتر الخاصة بنا باستخدام Excel VBA .
رمز VBA للتحقق مما إذا كان الملف موجودًا أم لا (سريع عرض)
1322
تنزيل المصنف التدريبي
تنزيل هذا المصنف التدريبي للتمرين أثناء قراءة هذه المقالة.
VBA تحقق مما إذا كان الملف موجودًا. xlsm
نظرة عامة على رمز VBA للتحقق مما إذا كان الملف موجودًا أم لا (تحليل خطوة بخطوة)
لذا ، دون مزيد من التأخير ، دعنا ننتقل إلى مناقشتنا الرئيسية اليوم. سنقوم بتقسيم كود VBA خطوة بخطوة لمعرفة كيفية التحقق مما إذا كان الملف موجودًا أم لا على أجهزة الكمبيوتر الخاصة بنا.
⧪ الخطوة 1: إدخال المطلوب الإدخال
في بداية الكود ، يتعين علينا إدخال المدخلات الضرورية فيه. هناك إدخال واحد فقط مطلوب في هذا الرمز ، وهو اسم الملف الذي نبحث عنه. أدخل اسم الملف الكامل (جنبًا إلى جنب مع الدليل المرتبط).
2802
⧪ الخطوة 2: استخراج اسم الملف باستخدام وظيفة VBA Dir
بعد ذلك ، سنستخدم خدعة صغيرة. سنستخدم VBA وظيفة Dir لاستخراج اسم الملف. في حالة عدم وجود مثل هذا الملف ، ستعيد الدالة سلسلة فارغة.
5779
⧪الخطوة 3: التحقق مما إذا كان الملف موجودًا باستخدام If-Block
هذه هي الخطوة الأكثر أهمية. قلنا سابقًا أنه في حالة عدم وجود ملف بالاسم المحدد ، فإن الدالة Dir ترجع سلسلة فارغة. سنستخدم هذه الخاصية داخل If-block للتحقق مما إذا كان الملف موجودًا أم لا.
2780
لذا فإن الكامل VBA الكود سيكون:
⧭ كود VBA:
6830
⧭ الإخراج:
قم بتشغيل الكود. على جهاز الكمبيوتر الخاص بي ، سيظهر مربع رسالة ، "الملف موجود" ، لأنه موجود بالفعل على جهازي.
على جهازك ، قد يختلف الإخراج اعتمادًا على ما إذا كان الملف موجود أم لا.
اقرأ المزيد: Excel VBA: تحقق من وجود ورقة (طريقتان بسيطتان)
تطوير ماكرو للتحقق من وجود مجموعة من الملفات أو عدم استخدام Excel VBA
هنا لدينا مجموعة بيانات في ورقة عمل Excel تحتوي على اسم بعض الملفات على طول مع الأدلة في النطاق B4: B8 .
هدفنا هو تطوير ماكرو يكتب موجود / غير موجود بجانب كل منها بعد التحقق مما إذا كانت موجودة أم لا على الكمبيوتر.
⧪ الخطوة 1: فتح نافذة VBA
اضغط على ALT + F11 على لوحة المفاتيح لفتح نافذة Visual Basic .
⧪ الخطوة 2: إدراج وحدة نمطية جديدة
اذهب إلى إدراج & GT. الوحدة النمطية في شريط الأدوات. انقر فوق وحدة . وحدة جديدة تسمى Module1 (أو أي شيء آخر حسب السجل السابق) سيفتح.
⧪ الخطوة 3: وضع رمز VBA
هذه هي الخطوة الأكثر أهمية. أدخل التعليمات البرمجية التالية VBA في الوحدة النمطية.
⧭ كود VBA:
2609
⧪ الخطوة 5: تشغيل الكود
انقر فوق أداة Run Sub / UserForm من شريط الأدوات أعلاه.
سيتم تشغيل الكود. وستحصل على “Exists” للملفات الموجودة ، و “Doesn't Exist” للملفات غير الموجودة.
اقرأ المزيد: كيفية التحقق مما إذا كانت القيمة موجودة في النطاق في Excel (8 طرق)
الخاتمة
لذلك ، هذه هي عملية تطوير ماكرو لإرسال بريد إلكتروني من Excel مع مرفق. هل لديك اسئلة؟ اسألني بكل حرية. ولا تنس زيارة موقعنا ExcelWIKI لمزيد من المشاركات والتحديثات.
