المحتوى
في بعض الأحيان نحتاج إلى معرفة عدد الصفوف المستخدمة في جدول بيانات Excel حتى نتمكن من إنشاء صيغة أو حتى ماكرو VBA. لحسن الحظ ، هناك بعض الطرق السهلة للقيام بذلك و Excel VBA هو واحد منهم فقط.أسهل طريقة لمعرفة هذه المعلومات هي الانتقال إلى أسفل ورقة العمل الخاصة بك وإلقاء نظرة على الرقم الموجود على يمين نقطة البيانات الأخيرة ؛ ومع ذلك ، مع VBA ، هذا الحساب بسيط للغاية.
الاتجاهات
-
افتح ورقة عمل Excel ومحرر VBA بالضغط على "Alt + F11".
-
بدء ملف مشروع VBA جديد بالنقر بزر الماوس الأيمن على المصنف الخاص بك ، وعرضه في القائمة على اليمين ، واختيار "جديد".
-
بدء تشغيل الوظيفة الجديدة عن طريق كتابة "Sub CountRows ()". هذا يخبر برنامج التحويل البرمجي VBA أن هناك روتين فرعي جديد لملف المشروع. إذا كنت تفضل إعادة تسمية الروتين الفرعي ، فقم بتغيير النص "CountRows" إلى أي اسم مطلوب ، ويجب اتباعه بالأقواس الموضحة أعلاه ، على سبيل المثال "YourName ()".
-
قم بإنشاء متغير بما في ذلك النص "Dim Count as Long" في السطر التالي.
-
أدخل الكود التالي:
عدد = 0 عدد = عدد + 1 ActiveCell.Offset (1 ، 0). حدد حلقة حتى IsEmpty (ActiveCell.Offset (0 ، 1))
هذا بإعلام برنامج التحويل البرمجي أنه من الضروري تحليل المتغير Count ومن ثم حساب صفوف ورقة العمل بأكملها. يضيف الرمز متغيرًا إلى العدد الإجمالي ، ثم ينتقل إلى الخلية التالية طالما كان فارغًا. عندما تصل إلى خلية فارغة ، يتوقف التنفيذ.
-
تنشيط مربع نص عن طريق إضافة سطر جديد مع النص "MsgBox Count". سيعرض هذا مربعًا منبثقًا يخبرك بالعدد الإجمالي للصفوف. لجعل المربع أكثر فائدة قليلاً ، يمكنك إدخال أي نص إضافي. إعادة تسمية السطر إلى:
MsgBox "هناك" [عدد عدد] "خطوط"
يمكنك تغيير النص بين علامات اقتباس حسب الرغبة.
-
أخيرًا ، اكتب "End Sub" في سطر جديد لإنهاء وظيفة الروتين الفرعي.
جدولة الماكرو
-
ارجع إلى ورقة عمل Excel واحفظها.
-
قم بتمييز خلية العمود الأولى التي تحتوي على أكبر عدد من البيانات. يجب ألا يحتوي هذا العمود على خلايا فارغة من أعلى إلى أسفل.
-
افتح قائمة "أدوات" واختر "وحدات ماكرو" لعرض مربع حوار يحتوي على جميع وحدات الماكرو المبرمجة لورقة العمل.
-
حدد الماكرو الذي تم إنشاؤه في القسم 1 ، باسم "CountRows" أو أي اسم آخر أعطيته ، وانقر فوق "تشغيل". عند الانتهاء ، سيعرض الماكرو مربع نص منبثق يخبرك بعدد الصفوف المملوءة
تشغيل الماكرو
نصائح
- إذا كنت بحاجة فقط إلى الحصول على رقم ، فإن البديل الأسهل والأبسط هو حساب الصفوف باستخدام صيغة. في خلية فارغة ، اكتب "= COUNT (A: A ، IF (A> 0،1،0))" ، حيث A هو العمود الذي يتم حساب عدد الصفوف فيه.