KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن إرجاع أول أو آخر خلية غير فارغة في صف أو عمود؟

المؤلفXiaoyangتاريخ التعديل

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

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

إرجاع أول خلية غير فارغة في صف أو عمود باستخدام صيغة

إرجاع آخر خلية غير فارغة في صف أو عمود باستخدام صيغة

إرجاع قيمة أول أو آخر خلية غير فارغة باستخدام ماكرو VBA

العثور على أول أو آخر خلية غير فارغة باستخدام وظيفة التصفية في Excel

سهم أزرق فقاعة جهة اليمينإرجاع أول خلية غير فارغة في صف أو عمود باستخدام صيغة

لاستخراج أول خلية تحتوي على بيانات من صف أو عمود، يمكنك استخدام تركيبة من دالتيINDEX وMATCH. يُطبَّق هذا الأسلوب عندما تريد استرجاع القيمة برمجيًا، مع الحفاظ على ديناميكية ورقة العمل عند تغيُّر البيانات الأساسية. إليك كيفية تنفيذ ذلك:

1. في خلية فارغة بجانب نطاق البيانات، أدخل الصيغة التالية:

=INDEX(A1:A13,MATCH(TRUE,INDEX((A1:A13<>0),0),0))

على سبيل المثال، إذا كانت بياناتك موجودة في الخلايا من A1 إلى A13، فستُرجع هذه الصيغة أول خلية غير فارغة وغير صفرية. راجع المثال أدناه:

تطبيق صيغة لإرجاع أول خلية غير فارغة

2. اضغط مفتاحEnter. ستُعرض قيمة أول خلية في النطاق ليست فارغة (أو ليست صفرًا، وفقًا لمنطق الصيغة) كما يلي:

اضغط مفتاح الإدخال للحصول على النتيجة

ملاحظات ونصائح:

  • في الصيغة أعلاه، يمكنك تعديلA1:A13لتشير إلى أي عمود أو صف (مثل)1:1 للصف 1، أوB2:M2 لجزء فرعي من صف).
  • تعمل هذه الطريقة بشكل موثوق مع صف واحد أو عمود واحد. أما في حالة الجداول أو النطاقات المكونة من تحديدات متعددة، فننصحك بتطبيق الصيغة على كل صف أو عمود على حدة.
  • إذا أعادت الصيغة خطأً ()#N/A)، فتأكد من أن نطاقك يحتوي فعليًا على خلية واحدة على الأقل غير فارغة وغير صفرية.
  • تذكّر أنه بالنسبة للخلايا الفارغة فعليًا («»)، استبدل0 بـ"" إذا كنت ترغب في تجاهل الخلايا الفارغة فقط دون الأصفار.
لقطة شاشة لـ kutools for excel الذكاء الاصطناعي

افتح سحر إكسل مع KUTOOLS AI

  • التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
  • الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
  • برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
  • تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
  • ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
حسِّن قدراتك في إكسل بأدوات مدعومة بالذكاء الاصطناعي.حمِّل الآنوجرِّب الكفاءة كما لم تفعل من قبل!

سهم أزرق فقاعة جهة اليمينإرجاع آخر خلية غير فارغة في صف أو عمود باستخدام صيغة

للحصول على القيمة من آخر خلية غير فارغة في نطاق معين، تُعدّ صيغةLOOKUP القائمة على المصفوفات حلاً فعّالاً ومباشرًا للبيانات الديناميكية أو المتغيرة. وهي مثالية لتحديد إدخال البيانات الأخير تلقائيًا في قائمة أو جدول ملخص!

1. اكتب الصيغة التالية في خلية فارغة بجانب نطاقك المستهدف:

=LOOKUP(2,1/(A1:A13<>""),A1:A13)

تفحص هذه الصيغة نطاقًا محدودًا وتعيد قيمة آخر خلية غير فارغة. على سبيل المثال، باستخدامA1:A13 كنطاق:

تطبيق صيغة لإرجاع آخر خلية غير فارغة

2. بعد الضغط علىEnter، سيحسب Excel ويعرض القيمة الموجودة في آخر خلية غير فارغة:
اضغط مفتاح الإدخال للحصول على النتيجة

ملاحظات واقتراحات:

  • يمكنك استخدام هذه الصيغة مع أي عمود أو صف واحد ()B1:B20،F8:F30، أو2:2، إلخ.). حدّث مرجع النطاق حسب الحاجة.
  • إذا كانت بياناتك تحتوي على أصفار ترغب في تجاهلها، يمكنك استبدالA1:A13"" بـA1:A130، ولكن تأكد من أن تمييزك بين الخلايا الفارغة فعليًّا والأصفار يتماشى مع هدفك.
  • يناسب هذا الأسلوب النطاقات البسيطة بشكل أفضل. أما في حالة النطاقات التي تحتوي على صيغ تُرجع «» (نصًا فارغًا)، فتعتبر هذه الصيغ الخلايا فارغة.
  • إذا كانت جميع الخلايا فارغة، تُرجع الصيغة خطأً من نوع#N/A.

سهم أزرق فقاعة جهة اليمين إرجاع قيمة أول أو آخر خلية غير فارغة باستخدام ماكرو VBA

للمستخدمين الذين يعملون مع مجموعات بيانات كبيرة أو يحتاجون إلى أتمتة مهام متكررة، يمكن لماكرو VBA بسيط أن يبسّط العملية بشكل كبير—خاصةً عند اختلاف النطاقات أو احتوائها على عدد كبير من الصفوف أو الأعمدة. وعلى عكس الصيغ، يُنفّذ VBA إجراءات عند الطلب، مثل العثور على أول خلية أو آخر خلية غير فارغة، مما يجعله الخيار المثالي للعمليات المتكررة عبر نطاقات متعددة.

1. افتح محرر VBA بالانتقال إلىDeveloper > Visual Basic. في نافذة VBA التي تظهر، انقرInsert > Module، ثم الصق إحدى الإجراءات التالية في نافذة الوحدة:

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

Sub FindFirstNonBlankCell()
    Dim rng As Range
    Dim cell As Range
    Dim firstValue As Variant
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
    
    firstValue = ""
    
    For Each cell In rng
        If cell.Value <> "" Then
            firstValue = cell.Value
            Exit For
        End If
    Next cell
    
    If firstValue <> "" Then
        MsgBox "The first non blank cell value is: " & firstValue, vbInformation, xTitleId
    Else
        MsgBox "No non blank cells found.", vbExclamation, xTitleId
    End If
End Sub

وبالمثل، إليك الكود للعثور علىآخرخلية غير فارغة:

Sub FindLastNonBlankCell()
    Dim rng As Range
    Dim cell As Range
    Dim lastValue As Variant
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
    
    lastValue = ""
    
    For Each cell In rng
        If cell.Value <> "" Then
            lastValue = cell.Value
        End If
    Next cell
    
    If lastValue <> "" Then
        MsgBox "The last non blank cell value is: " & lastValue, vbInformation, xTitleId
    Else
        MsgBox "No non blank cells found.", vbExclamation, xTitleId
    End If
End Sub

2. لتنفيذ الكود، انقر على زرRun في محرر VBA. سيتم مطالبتك بتحديد النطاق المستهدف للبحث عن الخلايا غير الفارغة. وبعد تحديدك واختيارك، ستعرض نافذة حوارية قيمة أول أو آخر خلية غير فارغة حسب الماكرو الذي شغّلته.زر التشغيل

  • هذه ماكروات مرنة ومناسبة لكلٍّ من الصفوف والأعمدة، بغض النظر عن حجم البيانات.
  • يتيح لك VBA أتمتة المهام ومعالجتها بشكل متكرر، مما يجعله الخيار المثالي للمهام المتكررة أو ذات الحجم الكبير.
  • عند تشغيل الماكروات، تأكد من حفظ مصنفك وتمكين الماكروات عند الحاجة، واختبرها دائمًا على بيانات عينة للتحقق من دقتها قبل تطبيقها على بياناتك المهمة.

سهم أزرق فقاعة جهة اليمين العثور على أول أو آخر خلية غير فارغة باستخدام وظيفة التصفية في Excel

إذا كنت بحاجة إلى طريقة بصرية سريعة لتحديد القيم غير الفارغة—خاصةً عند التعامل مع أعمدة بيانات ضخمة جدًا—فإن ميزةFilter المدمجة في Excel تُعدّ حلاً مثاليًا لتسليط الضوء على الإدخالات غير الفارغة لمحةً بصرية. وعلى الرغم من أن هذه الطريقة لن تُعيد القيمة تلقائيًا إلى خلية أخرى، إلا أنها فعّالة جدًا للمراجعة أو التنقّل أثناء تحليل البيانات.

إليك كيفية تحديد أول أو آخر خلية غير فارغة بصريًا من خلال التصفية:

  1. حدّد العمود أو الصف الذي يحتوي على بياناتك. ولتسهيل التصفية، يمكنك تحديد العمود بأكمله (على سبيل المثال، بالنقر على حرف العمود).
  2. انقر على علامة التبويبData، ثم اخترFilter.
  3. انقر على السهم الصغير الخاص بالتصفية في رأس نطاقك أو جدولك.
  4. قم بإلغاء تحديد الخيار(Blanks) لتظل الخلايا المملوءة فقط مرئية.
  5. بعد التصفية، تكون القيمة المرئية الأولى في أعلى العمود هي أول خلية غير فارغة؛ قم بالتمرير إلى الأسفل لرؤية آخر خلية غير فارغة.

المزايا:طريقة التصفية سريعة ولا تتطلب صيغًا، وتعمل بكفاءة حتى مع الأعمدة التي تحتوي على آلاف الصفوف.
العيوب:الحل بصري فقط—إذ لا يُخرِج النتيجة إلى خلية ولا يدعم الأتمتة كما تفعل الصيغ وVBA. ومع ذلك، فهو مثالي للمراجعات اليدوية والاستكشاف التفاعلي للبيانات.

استكشاف الأخطاء واقتراحات:
إذا بدت التصفية غير فعّالة، تأكد أولًا من أنك لم تُحدِّد جزءًا فقط من بياناتك، فقد يؤدي ذلك إلى تطبيق التصفية بشكل غير صحيح. ولإزالة عوامل التصفية عند الانتهاء واستعادة عرض مجموعة البيانات الكاملة، انقر علىData > Clear.

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

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

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

  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل