كيف يمكنك التحقق من وجود جدول بيانات محوري في مصنف؟
إذا كان لديك عدة جدول بيانات محوري في مصنفك، وترغب الآن في معرفة ما إذا كان جدول بيانات محوري معيّن موجودًا في هذا المصنف بسرعة، فقد تذهب عادةً إلى مربع حوار خيارات PivotTable للتحقق من أسماء جدول بيانات محوري واحدة تلو الأخرى. لكن هذه الطريقة تستغرق وقتًا طويلاً وتشكل عبئًا عندما يكون لديك عشرات أو مئات من جدول بيانات محوري. لذا، سأعرض لك خدعة تساعدك على حل هذه المهمة.
التحقق من وجود جدول بيانات محوري في مصنف باستخدام دالة معرّفة من قبل المستخدم
التحقق من وجود جدول بيانات محوري في مصنف باستخدام دالة معرّفة من قبل المستخدم
لمعرفة بسرعة ما إذا كان جدول بيانات محوري موجودًا في المصنف الحالي، يمكنك إنشاء دالة معرّفة من قِبل المستخدم (User Defined Function) لحل هذه المسألة.
1. افتح المصنف الذي تريد التحقق من وجود جدول محوري فيه.
2. اضغط مع الاستمرار على مفاتيحALT + F11، وسيتم فتح نافذةMicrosoft Visual Basic for Applications.
3. انقرإدراج > وحدة نمطية (Module)، ثم الصق الكود التالي فينافذة الوحدة النمطية (Module Window).
كود VBA: التحقق من وجود جدول بيانات محوري في مصنف
Function PivotExist(Name As String) As Boolean
'Update 20141112
Dim sh As Worksheet
Dim pt As PivotTable
PivotExist = False
For Each sh In ActiveWorkbook.Worksheets
For Each pt In sh.PivotTables
If pt.Name = Name Then
PivotExist = True
Exit For
End If
Next
Next
End Function
4. بعد ذلك، احفظ وأغلق هذا الكود، ثم عُد إلى ورقة العمل الخاصة بك وأدخل الصيغة التالية=pivotexist(«salereport») في خلية فارغة، كما هو موضح في لقطة الشاشة:
ملاحظات: (1.) في الصيغة أعلاه، “salereport” هو اسم جدول البيانات المحوري الذي تريد التحقق من وجوده.
(2.) يجب عليك كتابة اسم جدول البيانات المحوري بين علامتي اقتباس مزدوجتين، مع مراعاة حساسية الحالة في الاسم.
5. بعد إدخال الصيغة، اضغط على مفتاح Enter. إذا ظهرت في الخلية القيمةTRUE، فهذا يعني أن جدولًا محوريًّا موجودًا؛ أما إذا ظهرت القيمةFALSE، فهذا يعني أنه غير موجود.
مقالات ذات صلة:
كيف يمكن عرض قائمة بجميع الجداول المحورية من مصنف؟
كيف تضيف حقولًا متعددة إلى جدولك المحوري؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل