كيف يمكن عدّ عدد أوراق العمل المخفية بسرعة في Excel؟
إذا كان لديك دفتر عمل كبير يحتوي على مئات أوراق العمل، وبعضها مخفي. ولتلبية احتياجات خاصة، ترغب في معرفة عدد أوراق العمل المخفية في الدفتر، فكيف يمكنك فعل ذلك بدلاً من عدها واحدة تلو الأخرى؟ سأعرض الآن طريقتين يمكنهما عدّ أوراق العمل المخفية دفعة واحدة.
عدّ الأوراق المخفية باستخدام VBA
عدّ الأوراق المخفية/الظاهرة باستخدام Kutools لـ Excel
حذف الأوراق المخفية أو إظهار جميع الأوراق باستخدام Kutools لـ Excel
عدّ الأوراق المخفية باستخدام VBA
سأعرض لك كود VBA يُظهر مربع حوار يُبلغك بعدد أوراق العمل المخفية في دفتر العمل.
1. اضغط علىAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. انقر علىInsert > Module، ثم الصق الكود أدناه في نافذة الـModule الجديدة.
VBA: عدّ الأوراق المخفية.
Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
"Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub 3. اضغط علىF5 لتشغيل الكود، وسيظهر مربع حوار يُبلغك بعدد أوراق العمل المخفية وعدد أوراق العمل الظاهرة.

عدّ الأوراق المخفية/الظاهرة باستخدام Kutools لـ Excel
إذا لم تكن معتادًا على VBA، فيمكنك تثبيتKutools لـ Excelمجانًا لعرض عدد الأوراق والأوراق المخفية والأوراق الظاهرة بنظرة واحدة!
بعدتثبيتك المجاني لـKutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. انقر علىKutools > Navigation لعرض الجزء الجانبي. انظر لقطة الشاشة:

2. ثم انقر علىWorkbook & Sheet لعرض قائمة بأسماء الدفاتر وأوراق العمل، وانتقل إلى أسفل الجزء الجانبي لتكتشف عدد الأوراق الإجمالي، وعدد الأوراق المخفية، وعدد الأوراق الظاهرة.

تلميح:إذا لم تعد بحاجة إلى التنقّل، فانقر علىKutools > Navigation مرة أخرى لإخفائه.
حذف الأوراق المخفية أو إظهار جميع الأوراق المخفية باستخدام Kutools لـ Excel
باستخدامKutools لـ Excel، يمكنك حذف جميع الأوراق المخفية بنقرة واحدة!
1. إذا أردت إظهار جميع الأوراق، فما عليك سوى النقر علىKutools > Show & Hide > إظهار جميع الأوراق.

2. إذا أردت حذف جميع الأوراق المخفية، فما عليك سوى النقر علىKUTOOLS PLUS > Worksheet > حذف جميع الأوراق المخفية. انظر لقطة الشاشة:

أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل