كيف يمكن إخفاء الأعمدة تلقائيًا في Excel بناءً على التاريخ؟
افترض أن لديك نطاقًا من البيانات في ورقة عمل، وتريد الآن إخفاء الأعمدة تلقائيًا بناءً على تاريخ معيّن. فعلى سبيل المثال، بمجرد إدخالك التاريخ 5/16/2016 في خلية ما، سيتم إخفاء جميع الأعمدة التي يسبق تاريخها هذا التاريخ فورًا، كما يظهر في لقطة الشاشة التالية. ويقدّم لك هذا المقال بعض الحيل الذكية لإنجاز هذه المهمة بسلاسة.
إخفاء الأعمدة تلقائيًا بناءً على تاريخ معيّن باستخدام كود VBA
إخفاء الأعمدة بناءً على تاريخ معيّن مع Kutools لـ Excel
إخفاء الأعمدة تلقائيًا بناءً على تاريخ معيّن باستخدام كود VBA
لإنجاز هذه المهمة، قد يساعدك كود VBA التالي. يُرجى اتباع الخطوات التالية:
1. حدد تبويب الورقة التي تريد إخفاء أعمدتها حسب التاريخ، ثم انقر بزر الماوس الأيمن واخترعرض الكودمن القائمة السياقية للانتقال إلى نافذةمايكروسوفت فيجوال بيسك للتطبيقات، ثم انسخ والصق الكود التالي في الوحدة النمطية (Module):
كود VBA: إخفاء الأعمدة تلقائيًا بناءً على تاريخ معيّن:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xCell As Range
If Target.Address <> Range("K4").Address Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In Range("A1:I1")
xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
Next
Application.ScreenUpdating = True
End Sub
2. بعد ذلك، احفظ وأغلق هذا الكود، ثم ارجع إلى ورقة العمل. الآن، عند إدخال تاريخ في الخليةK4، سيتم إخفاء الأعمدة التي تحتوي على تواريخ أقدم من التاريخ المحدد تلقائيًا.
ملاحظة: في الكود أعلاه، الخليةK4 هي خلية التاريخ المعيّن التي تريد الإخفاء بناءً عليها، وA1:I1 هي خلايا الصف التي تحتوي على التواريخ المستخدمة.
إخفاء الأعمدة بناءً على تاريخ معيّن مع Kutools لـ Excel
إذا لم تكن معتادًا على التعامل مع الأكواد، فهناك أداة مفيدة—Kutools لـ Excel، حيث يمكنك باستخدام أداةتحديد خلايا محددةالخاصة بها إنجاز هذه المهمة بسهولة.
بعد تثبيتKutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. حدد رؤوس التواريخ، ثم انقر علىKutools > تحديد > تحديد خلايا محددة. انظر لقطة الشاشة:
2. في مربع الحوار المنبثقتحديد خلايا محددة، اخترالعمود بأكملهمن القائمةنوع التحديد، ثم حدد المعيار—مثلأقل من—من القائمة المنسدلةتحديد النوع، وأدخل التاريخ في مربع النص المجاور الذي تريد الإخفاء بناءً عليه. انظر لقطة الشاشة:
3. بعد ذلك، انقر على زرموافق، وسيتم تحديد جميع خلايا العمود التي يكون تاريخها أقل من 16/5/2016 دفعة واحدة. انظر لقطة الشاشة:
4. بعد ذلك، انقر بزر الماوس الأيمن على أي رأس عمود محدَّد، ثم اخترإخفاءلإخفاء هذه الأعمدة المحدَّدة حسب حاجتك. انظر لقطة الشاشة:
Kutools لـ Excel- عزِّز Excel بقوة أكثر من 300 أداة أساسية، لتجعل عملك أسرع وأسهل، واستفد من ميزات الذكاء الاصطناعي لمعالجة البيانات بشكل أكثر ذكاءً وزيادة الإنتاجية.احصل عليه الآن
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل