كيف تظهر العنصر الأول في القائمة المنسدلة بدلاً من أن تكون فارغة؟
قد تساعدنا القائمة المنسدلة في ورقة العمل في تسهيل إدخال البيانات ، فنحن نحتاج فقط إلى تحديد العناصر دون كتابتها واحدة تلو الأخرى. ولكن ، في بعض الأحيان ، عندما تنقر على القائمة المنسدلة ، فإنها تنتقل إلى العناصر الفارغة أولاً بدلاً من عنصر البيانات الأول كما هو موضح في لقطة الشاشة التالية ، وقد يكون ذلك بسبب حذف بيانات المصدر في نهاية القائمة. قد يكون من المزعج أن تضطر إلى التمرير إلى أعلى قائمة طويلة لكل خلية فارغة للتحقق من صحة البيانات. في هذه المقالة ، سأتحدث عن كيفية إظهار العنصر الأول دائمًا في القائمة المنسدلة.
اعرض العنصر الأول في القائمة المنسدلة بدلاً من أن يكون فارغًا باستخدام وظيفة التحقق من صحة البيانات
اعرض العنصر الأول تلقائيًا في القائمة المنسدلة بدلاً من أن يكون فارغًا برمز VBA
اعرض العنصر الأول في القائمة المنسدلة بدلاً من أن يكون فارغًا باستخدام وظيفة التحقق من صحة البيانات
في الواقع ، لتحقيق هذه الوظيفة ، تحتاج فقط إلى تطبيق صيغة محددة عند إنشاء قائمة منسدلة ، يرجى القيام بما يلي:
1. حدد الخلايا التي تريد إدراج القائمة المنسدلة فيها ، ثم انقر فوق البيانات > التحقق من صحة البيانات > التحقق من صحة البيانات، انظر لقطة الشاشة:
2. في خرجت التحقق من صحة البيانات مربع الحوار ، تحت الإعدادات علامة التبويب، اختر قائمة من السماح ، ثم أدخل هذه الصيغة: = OFFSET (Sheet3! $ A $ 1,0,0،3،1,1، COUNTA (SheetXNUMX! $ A: $ A) -XNUMX،XNUMX) في مصدر مربع النص ، انظر لقطة الشاشة:
ملاحظات: في هذه الصيغة ، Sheet3 هي ورقة العمل التي تحتوي على قائمة البيانات المصدر ، و A1 هي قيمة الخلية الأولى في القائمة.
3. ثم اضغط OK ، الآن ، عند النقر فوق خلايا القائمة المنسدلة ، يتم عرض عنصر البيانات الأول دائمًا في الأعلى سواء تم حذف قيم الخلية في نهاية البيانات المصدر ، انظر لقطة الشاشة:
اعرض العنصر الأول تلقائيًا في القائمة المنسدلة بدلاً من أن يكون فارغًا برمز VBA
هنا ، يمكنني أيضًا تقديم رمز VBA الذي يمكن أن يساعدك في إظهار العنصر الأول في القائمة المنسدلة تلقائيًا عند النقر فوق خلايا التحقق من صحة البيانات.
1. بعد إدراج القائمة المنسدلة ، حدد علامة تبويب ورقة العمل التي تحتوي على القائمة المنسدلة ، وانقر بزر الماوس الأيمن للاختيار عرض الرمز من قائمة السياق للذهاب إلى ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، ثم انسخ الكود التالي والصقه في الوحدة النمطية:
رمز فبا: إظهار عنصر البيانات الأول تلقائيًا في القائمة المنسدلة:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20160725
Dim xFormula As String
On Error GoTo Out:
xFormula = Target.Cells(1).Validation.Formula1
If Left(xFormula, 1) = "=" Then
Target.Cells(1) = Range(Mid(xFormula, 1)).Cells(1).Value
End If
Out:
End Sub
2. ثم احفظ وأغلق نافذة الكود ، والآن ، عند النقر فوق خلية القائمة المنسدلة ، سيتم عرض عنصر البيانات الأول مرة واحدة.
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!