Note: The other languages of the website are Google-translated. Back to English

كيف تجد الخلايا الفارغة الأولى في العمود في إكسيل؟

للحصول على قائمة البيانات ، قد يتم ملؤها ببعض الخلايا الفارغة. للعثور على أول خلية فارغة في النطاق المحدد للعمود ، يرجى تصفح البرنامج التعليمي أدناه لمزيد من التفاصيل.

ابحث عن أول خلية فارغة في العمود مع الصيغة
ابحث عن الخلية الفارغة الأولى في العمود برمز VBA


ابحث عن أول خلية فارغة في العمود مع الصيغة

في هذا القسم ، سنوضح لك كيفية العثور على أول خلية فارغة في العمود مع الصيغة. خذ قائمة البيانات أدناه كمثال ، يرجى القيام بما يلي.

1. حدد خلية فارغة لعرض النتيجة.

2. نسخ ولصق الصيغة = MIN (IF (A1: A23 = ""، ROW (A1: A23))) في Formula Bar ، ثم اضغط CTRL + تغير + أدخل مفاتيح على لوحة المفاتيح. انظر لقطة الشاشة:

ملاحظة: الرجاء تغيير النطاق في الصيغة إلى النطاق الخاص بك.

ثم ستحصل على رقم صف يظهر في الخلية المحددة. نظرًا لأن النطاق المحدد في العمود A ، استنادًا إلى الرقم المعروض ، فهذا يعني أن الخلية الفارغة الأولى هي A16.


ابحث عن الخلية الفارغة الأولى في العمود برمز VBA

إلى جانب الصيغة ، يمكنك أيضًا العثور على أول خلية فارغة في العمود برمز VBA. الرجاء القيام بما يلي.

1. صحافة قديم + A11 في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، انقر نقرًا مزدوجًا فوق اسم ورقة العمل الحالي في الشريط الأيسر لفتح محرر التعليمات البرمجية.

3. انسخ والصق رمز فبا التالي في المحرر.

كود فبا: ابحث عن الخلية الفارغة الأولى في العمود

Sub Findfirstblankcell()
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	For Each Rng In WorkRng
		If Rng.Value = "" Then
			MsgBox "No Value, in " & Rng.Address
		End If
	Next
End Sub

4. انقر فوق يجري زر أو اضغط على F5 مفتاح لتشغيل الكود.

5. بعد تشغيل الكود ، أ كوتولسفورإكسيل ينبثق مربع الحوار ، يرجى تحديد النطاق الذي تريد العثور على الخلية الفارغة الأولى ، ثم النقر فوق OK زر. انظر لقطة الشاشة:

ثم يظهر مربع حوار مع عنوان الخلية الفارغة الأولى في العمود المحدد المدرج بالداخل.

ملاحظة: إذا كانت هناك خلايا فارغة أخرى في النطاق المحدد ، فسيستمر مربع الحوار أعلاه في الظهور حتى ينتهي من العثور على جميع الخلايا الفارغة في النطاق.


مقالات ذات صلة:


أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (2)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لا يعمل مع Office 2016
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هذه الصفحة ليست مصدرًا جيدًا للمساعدة في Excel. ترجمة الصيغة إلى الألمانية خاطئة ببساطة: ترجمة "Row" إلى "Reihe" ولكن يجب أن تكون "Zeile"
لا توجد تعليقات منشورة هنا حتى الآن

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL