كيفية الحصول على اسم الورقة في إكسيل؟

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

في هذا البرنامج التعليمي، سوف تتعلم كلا الطريقتين مع الأمثلة.

استخدم صيغة للحصول على اسم ورقة العمل

لإنشاء صيغة للحصول على اسم ورقة العمل، نحتاج إلى استخدام الدالات CELLS وFIND وMID. هذه هي الوظيفة التي يمكنك من خلالها الحصول على اسم الورقة.

 =MID(CELL("filename"),FIND("]",CELL("filename"))+1,LEN(CELL("filename")))

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

في الجزء الأول، لدينا دالة CELL تقوم بإرجاع عنوان المصنف مع اسم الورقة الحالية.

وهذا هو العنوان الذي حصلنا عليه من وظيفة الخلية. هنا يمكنك أن ترى أن لديك اسم الورقة في نهاية العنوان وتحتاج إلى الحصول على اسمها.

الآن في الجزء الثاني لدينا وظيفة FIND التي تستخدم وظيفة الخلية للحصول على العنوان والعثور على موضع الحرف الذي لديك موضع واحد بالضبط أمام اسم الورقة.

وبمجرد حصولك على رقم موضع “]”، تحتاج إلى إضافة 1 إليه للحصول على موضع الحرف الأول من اسم الورقة.

الآن في الجزء الثالث لديك وظائف LEN وCELL لحساب الأحرف في المسار بأكمله.

الآن لدينا في هذه المرحلة مسار العنوان، وموضع الحرف الأول من اسم الورقة، وعدد الأحرف الموجودة في مسار العنوان.

وفي الجزء الرابع، باستخدام الدالة MID، لديك اسم الورقة في النتيجة.

قم بإنشاء وظيفة معرفة من قبل المستخدم للحصول على اسم الورقة

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

 Function mySheetName() mySheetName = ActiveSheet.Name End Function

الآن دعونا نرى كيفية استخدام هذا الرمز لاستخراج اسم ورقة العمل الحالية إلى خلية. استخدم الخطوات التالية:

1. أولاً، انتقل إلى علامة التبويب “المطور” وانقر فوق Visual Basic.
   
2. الآن في محرر Visual Basic، انتقل إلى خيار “إدراج” وانقر فوق “وحدة نمطية” لإدراج وحدة نمطية.
   
3. بعد ذلك اذهب إلى نافذة الكود وألصق الكود أعلاه هناك.
   
4. في النهاية، أغلق محرر Visual Basic وارجع إلى جدول البيانات.

الآن، حدد إحدى الخلايا في ورقة العمل التي تريد الحصول على اسمها وأدخل الوظيفة التالية فيها.

يمكنك معرفة المزيد حول إنشاء وظيفة مخصصة من هذا البرنامج التعليمي.