كيف يمكنني البحث حسب اسم ورقة العمل في Excel؟

ستقدّم هذه الطريقة ماكرو VBA يتيح لك البحث بسهولة في ورقة العمل ضمن المصنف الحالي.

1. اضغط مفاتيحAlt + F11 في آنٍ واحد لفتح نافذة Microsoft Visual Basic for Applications.

2. انقرإدراج > وحدة نمطية، ثم الصق كود VBA التالي في نافذة الوحدة النمطية الجديدة التي تم فتحها.

VBA: البحث حسب اسم ورقة العمل

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3. اضغط مفتاحF5 أو انقر زرتشغيللتشغيل هذا الكود البرمجي VBA.

4. ستظهر نافذة مربع حوار «بحث عن الورقة»، يُرجى كتابة اسم ورقة العمل التي تريد البحث عنها، ثم انقر زرموافق. راجع لقطة الشاشة:

سيظهر مربع حوار آخر يُبلغك عما إذا تم العثور على الورقة أم لا. ما عليك سوى إغلاقه.

ملاحظة:يتطلب كود VBA هذا تطابقًا تامًّا مع اسم ورقة العمل. ولن تتمكن من العثور على الورقة باستخدام هذا الكود إلا إذا أدخلت اسم ورقة العمل الكامل بدقة.

إذا كان لديك Kutools لـ Excel مثبّتًا، فيمكنك بسهولة البحث في أوراق العمل حسب اسم الورقة باستخدام ميزة التنقّل. اتبع الخطوات التالية:

1. بشكل افتراضي، تكون لوحة التنقل مفتوحة. وإذا كانت مغلقة، فالرجاء النقر علىKutools > التنقللعرض لوحة التنقل، ثم انقر على (الدفتر والورقة) الموجود في أقصى الجانب الأيسر من شريط التنقل.

2. استمر في تحديد خانة الاختيارتصفيةفي لوحة التنقل، ثمأدخل الكلمات المفتاحية المطلوبة في الحقل أدناه. سيتم الآن عرض جميع أوراق العمل التي تحتوي أسماؤها على هذه الكلمات المفتاحية في الحقل السفلي. راجع لقطة الشاشة:

ملاحظة: يؤدي النقر على نتائج البحث إلى الانتقال فورًا وفتح ورقة العمل المقابلة.

إنشاء ارتباط تشعبي في خلية يشير إلى ورقة أخرى ضمن نفس الدفتر