كيفية التحقق مما إذا كانت خلية أو نطاق من الخلايا المتعددة فارغًا باستخدام Excel VBA؟

سنتعرف اليوم على كيفية التحقق بسهولة مما إذا كانت خلية واحدة أو عدة خلايا فارغة باستخدام Visual Basic for Applications. المحتوى مناسب لـ Excel 2019/365 ، 2016 والإصدارات السابقة من Microsoft Office.

العمل التحضيري

قبل بدء الترميز باستخدام VBA في Excel ، ستحتاج إلى التأكد من تمكين علامة تبويب التطوير. إذا لم يكن الأمر كذلك ، فيرجى إلقاء نظرة على هذا البرنامج التعليمي القصير .

التحقق مما إذا كان نطاق خلايا Excel فارغًا باستخدام VBA

  • في Excel ، افتح بيئة Visual Basic الخاصة بك عن طريق الضغط على Alt + F11
  • أدخل التعليمات البرمجية التالية كإجراء في ورقة العمل الخاصة بك ، أو بدلاً من ذلك في وحدة نمطية VBA مخصصة.
Sub Check_Cell_is_empty_alt()

Dim rng As Range
Set rng = Selection

For Each Cell In rng

    If IsEmpty(Cell.Value) = True Then
        
    Debug.Print ("Empty")
    Else
        Debug.Print ("Not Empty")
    End If
Next Cell


End Sub


  • انتقل إلى جدول البيانات الخاص بك وحدد نطاقًا عشوائيًا من الخلايا.
  • ارجع إلى محرر Visual Basic وتأكد من أن العارض الفوري (CTRL + G) مرئي - لأن طريقة Debug.Print في الكود ستخرج نتائجه إلى تلك النافذة.
  • اضغط على F5 لتشغيل التعليمات البرمجية الخاصة بك.
  • انظر إلى النتائج في النافذة الفورية.

كيفية التحقق مما إذا كانت خلية أو نطاق من الخلايا المتعددة فارغًا باستخدام Excel VBA؟

  • سيتم تحديد جميع الخلايا الفارغة.

الامتدادات المحتملة للرمز: من الواضح أنه يمكنك تمديد هذا الرمز حسب الحاجة في حال كنت مهتمًا بتخطي القيم الفارغة أو لا تفعل شيئًا في حالة عدم امتلاء الخلايا. وبالمثل ، يمكنك التحقق مما إذا كان النطاق نفسه فارغًا ، أي - لم يتم احتواء أي خلايا سوداء.

تدقيق الحقول غير الفارغة

بنفس الطريقة يمكنك استخدام الخاصية IsEmpty للتحقق من الحقول غير الفارغة.

 If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Not Empty")
    Else
        Debug.Print ("Empty")
    End If

المكافأة: استخدم الكود التالي إذا كنت تريد تمييز الخلايا الفارغة أيضًا.

خافت i طويل خافت c طويل خافت myRange كنطاق خافت myCell كنطاق اضبط myRange = Range("A1:A10") لكل myCell في myRange ' c = c + 1 If IsEmpty(myCell) ثم myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "يوجد إجمالي " & أنا وأمبير. " خلية (خلايا) فارغة من " & معسكر؛ "."

اترك تعليقاً

قائمة تحقق قابلة للطباعة لتخطيط الفعاليات وقالب ميزانية لبرنامج Word

قائمة تحقق قابلة للطباعة لتخطيط الفعاليات وقالب ميزانية لبرنامج Word

استخدم قائمة التحقق القابلة للطباعة لتخطيط الفعاليات وقالب الميزانية في Word لتتبع المسؤولين، والمواعيد النهائية، والتكاليف، والموردين، وجاهزية يوم الفعالية مع فحوصات جودة واضحة.

كيفية إصلاح عدم احتساب معادلات Excel تلقائيًا في 3 خطوات سهلة

كيفية إصلاح عدم احتساب معادلات Excel تلقائيًا في 3 خطوات سهلة

أصلح معادلات Excel التي لا تُحتسب تلقائيًا في ثلاث خطوات: استعادة وضع الحساب، فرض إعادة الحساب، وإصلاح المعادلات المنسقة كنص.

قالب جدول تنظيف أسبوعي قابل للطباعة لمضيفي Airbnb (Word و PDF)

قالب جدول تنظيف أسبوعي قابل للطباعة لمضيفي Airbnb (Word و PDF)

استخدم جدول التنظيف الأسبوعي القابل للطباعة هذا لاستضافة Airbnb لتنظيم عمليات التبديل، والتنظيف الدوري، وإعادة التخزين، والفحوصات، والتسليم من Word إلى PDF.

قالب سجل صيانة المعدات في Excel لمديري الورش: دليل إعداد من 4 خطوات

قالب سجل صيانة المعدات في Excel لمديري الورش: دليل إعداد من 4 خطوات

أنشئ سجل صيانة معدات عمليًا في Excel لمديري الورش، يتضمن معرفات الأصول، سجل الخدمة، مواعيد الاستحقاق، ضوابط الحالة، تتبع التوقف عن العمل، وقائمة تدقيق نهائية.

قالب عرض تقديمي لملف تعريف المستثمرين بأسلوب بسيط لبرنامج باوربوينت للشركات الناشئة في مجال التكنولوجيا: مخطط عملي من 12 شريحة

قالب عرض تقديمي لملف تعريف المستثمرين بأسلوب بسيط لبرنامج باوربوينت للشركات الناشئة في مجال التكنولوجيا: مخطط عملي من 12 شريحة

أنشئ ملف تعريف للمستثمرين بأسلوب بسيط باستخدام باوربوينت مع هيكل عملي من 12 شريحة للشركات الناشئة في مجال التكنولوجيا، بالإضافة إلى إرشادات حول الأدلة، والمقاييس، ومطالبات جمع التمويل، وقوالب .potx القابلة لإعادة الاستخدام.

قالب عرض بوربوينت مجاني لقوائم العقارات الحديثة: مخطط عملي لعرض البائع

قالب عرض بوربوينت مجاني لقوائم العقارات الحديثة: مخطط عملي لعرض البائع

أنشئ عرض تقديمي حديث لقوائم العقارات باستخدام PowerPoint مع مخطط شرائح مجاني، ونصائح موثوقة للقوالب، وتحذيرات حول تحليل السوق المقارن، وفحوصات حقوق الصور، وضمانات الإسكان العادل.

HubSpot Free CRM مقابل Zoho CRM: الخيار الأفضل للوسطاء العقاريين المستقلين في عام 2026

HubSpot Free CRM مقابل Zoho CRM: الخيار الأفضل للوسطاء العقاريين المستقلين في عام 2026

قارن بين HubSpot Free CRM و Zoho CRM للوسطاء العقاريين المستقلين، بما في ذلك جهات الاتصال، وخطوط المعاملات، والأتمتة، والتخصيص، وجدولة المواعيد، والحدود، ومحفزات الترقية.

كيفية إصلاح مشكلة عدم عمل الصوت في تسجيل شاشة PowerPoint على Windows

كيفية إصلاح مشكلة عدم عمل الصوت في تسجيل شاشة PowerPoint على Windows

أصلح تسجيلات شاشة PowerPoint الصامتة من خلال التحقق من عنصر التحكم في الصوت، وأذونات الميكروفون في Windows، وجهاز الإدخال النشط، وتوقعات صوت النظام، وتحديثات Office.

قالب PDF قابل للطباعة لحجز الوقت اليومي للمحترفين العاملين من المنزل: دليل للمبتدئين

قالب PDF قابل للطباعة لحجز الوقت اليومي للمحترفين العاملين من المنزل: دليل للمبتدئين

استخدم قالب PDF قابل للطباعة لحجز الوقت اليومي لتخطيط ساعات العمل المركّز، والاجتماعات، والاستراحات، والمهام الإدارية، وهوامش الأمان الواقعية دون إرهاق يومك.

قالب عرض تقديمي مجاني لتقرير حالة المشروع لفرق الأجايل

قالب عرض تقديمي مجاني لتقرير حالة المشروع لفرق الأجايل

أنشئ عرضًا تقديميًا موجزًا لتقرير حالة مشروع الأجايل يتضمن أهداف السبرنت، والنتائج، والمخاطر، وإشارات الجودة، والقرارات، والخطوات التالية—دون تحويل العرض إلى مجرد قائمة مهام غير منظمة.