كيفية البحث عن قيمة الخلية الأولى المرئية والحصول عليها بعد التصفية في Excel؟
في بعض الحالات ، قد تحتاج إلى الحصول على قيمة أول خلية مرئية في قائمة تمت تصفيتها. كيف يتم تحقيق ذلك؟ ستوضح لك هذه المقالة طرق لحلها.
ابحث عن قيمة الخلية المرئية الأولى واحصل عليها بعد التصفية باستخدام صيغة الصفيف
ابحث عن قيمة الخلية الأولى المرئية واحصل عليها بعد التصفية باستخدام VBA
ابحث عن قيمة الخلية المرئية الأولى واحصل عليها بعد التصفية باستخدام صيغة الصفيف
يمكنك تطبيق صيغة الصفيف التالية للحصول على قيمة أول خلية مرئية في قائمة تمت تصفيتها. الرجاء القيام بما يلي.
1. حدد خلية فارغة لوضع أول قيمة مرئية ، أدخل الصيغة أدناه فيها ، ثم اضغط على CTRL + تغير + أدخل مفاتيح في نفس الوقت.
=INDEX(C2:C19,MIN(IF(SUBTOTAL(3,OFFSET(C2,ROW(C2:C19)-ROW(C2),0)),ROW(C2:C19)-ROW(C2)+1)))
ملاحظات: في الصيغة ، C2: C19 هي القائمة المصفاة التي تريد إرجاع قيمة الخلية المرئية الأولى ، C2 هي الخلية الأولى في القائمة. يمكنك تغييرها كما تريد.
بعد ذلك ، يمكنك رؤية قيمة الخلية المرئية الأولى في القائمة المصفاة المملوءة في الخلية المحددة كما هو موضح أعلاه.
ابحث عن قيمة الخلية الأولى المرئية واحصل عليها بعد التصفية باستخدام VBA
بالإضافة إلى استخدام صيغة الصفيف أعلاه للحصول على قيمة الخلية المرئية الأولى في قائمة تمت تصفيتها ، يمكنك تشغيل البرنامج النصي VBA أدناه لإرجاع الخلية المرئية الأولى من القائمة المصفاة بسرعة. الرجاء القيام بما يلي.
1. حدد خلية فارغة مثل E8 لوضع قيمة الخلية المرئية الأولى لقائمة تمت تصفيتها.
2. صحافة قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
3. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا أدناه في نافذة الوحدة النمطية.
كود فبا: ابحث عن قيمة الخلية الأولى المرئية واحصل عليها بعد التصفية في إكسيل
Sub FirstVisibleCell()
With Worksheets("Sheet1").AutoFilter.Range
ActiveCell.Value2 = Range("C" & .Offset(1, 0).SpecialCells(xlCellTypeVisible)(1).Row).Value2
End With
End Sub
ملاحظات: في الكود ، الورقة 1 هي اسم الورقة الذي يحتوي على القائمة المصفاة. "C" هو اسم العمود الذي تريد الحصول على أول قيمة مرئية منه. يمكنك تغييرها كما تريد.
3. اضغط على F5 مفتاح لتشغيل التعليمات البرمجية ، ثم سيتم ملء الخلية الأولى المرئية من القائمة المصفاة التي تقع في العمود C في الخلية E8 على الفور.
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!