كيفية حساب عدد أوراق العمل المخفية بسرعة في إكسيل؟
إذا كان لديك مصنف كبير به مئات أوراق العمل ، وتم إخفاء بعض أوراق العمل. لتلبية بعض الاحتياجات الخاصة تريد معرفة عدد أوراق العمل المخفية في المصنف ، كيف يمكنك القيام بذلك بدلاً من عدها واحدة تلو الأخرى؟ سأقدم الآن حيلتين يمكنهما حساب أوراق العمل المخفية بسرعة في وقت واحد.
عد الأوراق المخفية باستخدام VBA
عد الأوراق المخفية / المرئية باستخدام Kutools for Excel
احذف الأوراق المخفية أو أظهر جميع الأوراق المخفية باستخدام Kutools for Excel
عد الأوراق المخفية باستخدام VBA
أقدم رمز VBA الذي يمكن أن يظهر مربع حوار يخبرك بعدد أوراق العمل المخفية في مصنف.
1. صحافة ALT + F11 مفاتيح لتمكين ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود أدناه في ملف وحدة نافذة.
فبا: عد الأوراق المخفية.
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 for Excel
إذا لم تكن معتادًا على VBA ، فيمكنك التثبيت مجانًا كوتولس ل إكسيل لحساب عدد الأوراق والأوراق المخفية والأوراق المرئية في لمحة.
كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. |
بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:
1. انقر كوتولس > قائمة الإختيارات لعرض الجزء. انظر لقطة الشاشة:
2. ثم اضغط مصنف وورقة زر لسرد الكتب وأوراق العمل ، وانتقل إلى الجزء السفلي من الجزء ، يمكنك العثور على إجمالي الأوراق والأوراق المخفية والأوراق المرئية.
تلميح: إذا لم تعد بحاجة إلى جزء التنقل بعد الآن ، فانقر فوق كوتولس > قائمة الإختيارات مرة أخرى لإخفائه.
احذف الأوراق المخفية أو قم بإلغاء إخفاء جميع الأوراق المخفية باستخدام Kutools for Excel
بدافع كوتولس ل إكسيل، يمكنك أيضًا إزالة جميع الأوراق المخفية بنقرة واحدة.
1. إذا كنت تريد إظهار كافة الأوراق المخفية ، فقط انقر فوق كوتولس > اظهر المخفي > إظهار كافة الأوراق المخفية.
2. إذا كنت تريد حذف كافة الأوراق المخفية ، فقط انقر فوق مشروع > ورقة العمل > حذف كافة الأوراق المخفية. انظر لقطة الشاشة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!