إخفاء / إظهار الصفوف والأعمدة غير الضرورية

صياغة المشكلة

لنفترض أن لدينا طاولة يجب أن "نرقص" معها كل يوم:

لمن يبدو الجدول صغيرًا - اضربه ذهنيًا عشرين مرة حسب المساحة، وأضف بضع كتل أخرى وعشرين مدينة كبيرة. 

وتتمثل المهمة في الإزالة مؤقتًا من صفوف الشاشة والأعمدة غير الضرورية للعمل حاليًا ، على سبيل المثال ، 

• إخفاء التفاصيل حسب الشهر ، وترك أرباع فقط
• إخفاء المجاميع حسب الأشهر والأرباع ، ولم يتبق سوى الإجمالي لمدة نصف عام
• إخفاء المدن غير الضرورية في الوقت الحالي (أعمل في موسكو - لماذا يجب أن أرى مدينة سانت بطرسبرغ؟) ، إلخ.

في الحياة الواقعية ، هناك بحر من الأمثلة على هذه الجداول.

الطريقة الأولى: إخفاء الصفوف والأعمدة

الطريقة ، بصراحة ، بدائية وليست مريحة للغاية ، لكن يمكن قول كلمتين عنها. يمكن إخفاء أي صفوف أو أعمدة محددة مسبقًا على الورقة بالنقر بزر الماوس الأيمن فوق العمود أو رأس الصف وتحديد الأمر من قائمة السياق إخفاء (يخفي):

للعرض العكسي ، حدد الصفوف / الأعمدة المجاورة ، وبالنقر بزر الماوس الأيمن ، حدد من القائمة ، على التوالي ، عرض (إظهار).

المشكلة أن عليك التعامل مع كل عمود وصف على حدة ، وهو أمر غير مريح.

الطريقة 2. التجميع

إذا قمت بتحديد صفوف أو أعمدة متعددة ثم حددت من القائمة البيانات - المجموعة والبنية - المجموعة (بيانات - مجموعة ومخطط تفصيلي - مجموعة)، ثم يتم وضعهم بين قوسين مربعين (مجمعين). علاوة على ذلك ، يمكن أن تتداخل المجموعات مع بعضها البعض (يُسمح بما يصل إلى 8 مستويات متداخلة):

هناك طريقة أكثر ملاءمة وأسرع وهي استخدام اختصار لوحة المفاتيح لتجميع الصفوف أو الأعمدة المحددة مسبقًا. Alt + Shift + سهم لليمينولفك التجميع Alt + Shift + سهم لليسار، على التوالي.

هذه الطريقة لإخفاء البيانات غير الضرورية أكثر ملاءمة - يمكنك إما النقر فوق الزر بعلامة "+"أو"-"، أو على الأزرار التي تحتوي على مستوى تجميع رقمي في الزاوية اليسرى العلوية من الورقة - عندئذٍ سيتم طي كل مجموعات المستوى المطلوب أو توسيعها مرة واحدة.

أيضا، إذا كان جدولك يحتوي على صفوف أو أعمدة تلخيصية بوظيفة جمع الخلايا المجاورة، هذه فرصة (ليست صحيحة 100٪) أن Excel سيخلق كل المجموعات الضرورية في الجدول بحركة واحدة - من خلال القائمة البيانات - المجموعة والبنية - إنشاء البنية (البيانات - المجموعة والمخطط التفصيلي - إنشاء مخطط تفصيلي). لسوء الحظ ، تعمل هذه الوظيفة بشكل غير متوقع للغاية وفي بعض الأحيان لا معنى لها في الجداول المعقدة. لكن انت تستطيع المحاولة.

في Excel 2007 والإصدارات الأحدث ، توجد كل هذه الفرح في علامة التبويب البيانات (تاريخ) في مجموعة   الهيكلية (الخطوط العريضة):

الطريقة الثالثة. إخفاء الصفوف / الأعمدة التي تم وضع علامة عليها باستخدام ماكرو

ربما تكون هذه الطريقة هي الأكثر تنوعًا. دعنا نضيف صفًا فارغًا وعمودًا فارغًا إلى بداية الورقة الخاصة بنا ونضع علامة بأي رمز على تلك الصفوف والأعمدة التي نريد إخفاءها:

لنفتح الآن محرر Visual Basic (ALT + F11) ، أدخل وحدة فارغة جديدة في كتابنا (menu إدراج - وحدة) وانسخ نص اثنين من وحدات الماكرو البسيطة هناك:

Sub Hide () Dim cell As Range Application.ScreenUpdating = False 'تعطيل تحديث الشاشة لتسريع كل خلية في ActiveSheet.UsedRange.Rows (1). تكرار الخلايا على جميع الخلايا في الصف الأول إذا كانت الخلية. القيمة = "x "ثم الخلية .EntireColumn.Hidden = True 'إذا كان في الخلية x - إخفاء العمود التالي لكل خلية في ActiveSheet.UsedRange.Columns (1). تمر الخلايا عبر جميع خلايا العمود الأول إذا كانت الخلية.القيمة =" x "ثم cell.EntireRow.Hidden = True 'إذا كان في الخلية x - إخفاء الصف Next Application.ScreenUpdating = True End Sub Sub Show () Columns.Hidden = False' إلغاء جميع الصفوف والأعمدة المخفية Rows.Hidden = False End Sub  

كما قد تتخيل ، الماكرو إخفاء يخفي والماكرو عرض - يعرض مرة أخرى الصفوف والأعمدة المسماة. إذا رغبت في ذلك ، يمكن تعيين مفاتيح التشغيل السريع لوحدات الماكرو (ALT + F8 والزر المعلمات) ، أو أنشئ أزرارًا مباشرة على الورقة لتشغيلها من علامة التبويب المطور - إدراج - زر (مطور - إدراج - زر).

الطريقة الرابعة. إخفاء الصفوف / الأعمدة بلون معين

لنفترض أنه في المثال أعلاه ، نريد ، على العكس من ذلك ، إخفاء المجاميع ، أي الصفوف الأرجواني والأسود والأعمدة الصفراء والخضراء. بعد ذلك ، سيتعين تعديل الماكرو السابق قليلاً عن طريق إضافة ، بدلاً من التحقق من وجود "x" ، تحقق لمطابقة لون التعبئة مع خلايا العينة المختارة عشوائيًا:

Sub HideByColor () خلية باهتة كتطبيق النطاق. ScreenUpdating = خطأ لكل خلية في ActiveSheet.UsedRange.Rows (2) .Cells If cell.Interior.Color = Range ("F2"). Interior.Color ثم cell.EntireColumn.Hidden = True If cell.Interior.Color = Range ("K2"). Interior.Color ثم cell.EntireColumn.Hidden = True Next لكل خلية في ActiveSheet.UsedRange.Columns (2) .Cells If cell.Interior.Color = Range ("D6"). Interior.Color ثم cell.EntireRow.Hidden = True If cell.Interior.Color = Range ("B11"). Interior.Color ثم cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub  

ومع ذلك ، يجب ألا ننسى تحذيرًا واحدًا: لا يعمل هذا الماكرو إلا إذا كانت خلايا الجدول المصدر مملوءة بالألوان يدويًا ، وليس باستخدام التنسيق الشرطي (هذا قيد على خاصية Interior.Color). لذلك ، على سبيل المثال ، إذا قمت تلقائيًا بتمييز جميع الصفقات في جدولك حيث يكون الرقم أقل من 10 باستخدام التنسيق الشرطي:

... وتريد إخفاءها بحركة واحدة ، ثم يجب أن يكون الماكرو السابق "منتهيًا". إذا كان لديك Excel 2010-2013 ، فيمكنك الخروج باستخدام بدلاً من الخاصية الخاص بك الملكية شاشة العرض، الذي ينتج لون الخلية ، بغض النظر عن كيفية تعيينها. قد يبدو الماكرو لإخفاء الخطوط الزرقاء كما يلي:

Sub HideByConditionalFormattingColor () تعتيم الخلية باعتبارها تطبيق نطاق. .EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub  

يتم أخذ الخلية G2 كعينة لمقارنة الألوان. للأسف الخاصية تنسيق العرض ظهر في Excel فقط بدءًا من إصدار 2010 ، لذلك إذا كان لديك Excel 2007 أو أقدم ، فسيتعين عليك ابتكار طرق أخرى.

• ما هو الماكرو ، ومكان إدراج رمز الماكرو ، وكيفية استخدامها
• التجميع التلقائي في قوائم متعددة المستويات