كيفية مسح عوامل التصفية عند فتح المصنف أو حفظه أو إغلاقه في Excel؟
افترض أن لديك أوراق عمل متعددة تحتوي على بيانات تمت تصفيتها في المصنف الخاص بك. لمسح جميع عوامل التصفية ، تحتاج إلى التحقق من القائمة التي تمت تصفيتها في أوراق عمل مختلفة ثم مسحها يدويًا واحدة تلو الأخرى. هذا مزعج! في هذه المقالة ، سنعرض لك عدة طرق لمسح عوامل التصفية عند فتح مصنف في Excel أو حفظه أو إغلاقه.
امسح عوامل التصفية عند فتح المصنف في Excel
امسح عوامل التصفية عند حفظ المصنف في Excel
امسح عوامل التصفية عند إغلاق / إنهاء المصنف في Excel
امسح عوامل التصفية عند فتح المصنف في Excel
يتحدث هذا القسم عن مسح عوامل التصفية في جميع أوراق العمل عند فتح مصنف. الرجاء القيام بما يلي.
1. في أي مصنف ، تحتاج إلى مسح جميع عوامل التصفية تلقائيًا عند الفتح ، يرجى الضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، الرجاء النقر المزدوج ThisWorkbook في اليسار حملات التبرع ، ثم انسخ والصق رمز VBA أدناه في ملف ThisWorkbook (كود) نافذة او شباك. انظر لقطة الشاشة:
كود فبا: امسح كل عوامل التصفية عند فتح المصنف
Private Sub Workbook_Open()
'Updated by Extendoffice 20221012
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.ShowAllData
End If
Next ws
End Sub
3. اضغط على قديم + Q مفاتيح للخروج من ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
4. انقر قم بتقديم > حفظ باسم. في ظهرت حفظ باسم في مربع الحوار ، حدد مجلدًا لحفظ هذا المصنف ، وقم بتسميته كما تريد في ملف اسم الملف مربع ، ثم حدد مصنف Excel ممكن بماكرو الخيار من حفظ كنوع القائمة المنسدلة ، ثم انقر فوق الزر حفظ .
من الآن فصاعدًا ، عند فتح هذا المصنف الذي تم تمكينه بماكرو ، سيتم مسح جميع عوامل التصفية في هذا المصنف تلقائيًا.
امسح عوامل التصفية عند حفظ المصنف في Excel
يمكنك مسح كافة عوامل التصفية من المصنف الحالي في كل مرة تقوم فيها بحفظه.
1. في المصنف الذي تريد مسح جميع عوامل التصفية منه تلقائيًا ، يرجى الضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، الرجاء النقر المزدوج ThisWorkbook في اليسار حملات التبرع ، ثم انسخ والصق رمز VBA أدناه في ملف ThisWorkbook (كود) نافذة او شباك. انظر لقطة الشاشة:
كود فبا: امسح عوامل التصفية عند حفظ المصنف
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updated by Extendoffice 20221012
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.ShowAllData
End If
Next ws
End Sub
3. صحافة قديم + Q مفاتيح للخروج من ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
من الآن فصاعدًا ، عند حفظ المصنف ، سيتم مسح جميع عوامل التصفية تلقائيًا.
امسح عوامل التصفية عند إغلاق / إنهاء المصنف في Excel
في القسم الأخير ، سنوضح لك كيفية مسح جميع عوامل التصفية عبر أوراق العمل عند إغلاق المصنف أو الخروج منه.
1. افتح المصنف الذي تريد مسح جميع عوامل التصفية منه تلقائيًا ، ثم اضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، الرجاء النقر المزدوج ThisWorkbook في اليسار حملات التبرع ، ثم انسخ والصق رمز VBA أدناه في ملف ThisWorkbook (كود) نافذة او شباك. انظر لقطة الشاشة:
كود فبا: امسح كل عوامل التصفية عبر أوراق العمل عند إغلاق / إنهاء المصنف
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.AutoFilterMode = False
End If
Next ws
End Sub
ملاحظات: إذا كنت ترغب فقط في مسح عوامل التصفية في ورقة العمل الحالية ، فالرجاء استخدام رمز VBA أدناه.
كود فبا: امسح عامل التصفية في الورقة النشطة عند إغلاق المصنف
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20221012
Dim ws As Worksheet
Set ws = ActiveSheet
If ws.AutoFilterMode Then
ws.ShowAllData
End If
End Sub
3. صحافة قديم + Q مفاتيح للخروج من ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
من الآن فصاعدًا ، سيتم مسح جميع عوامل التصفية تلقائيًا بعد النقر فوق الزر إغلاق في المصنف.
مقالات ذات صلة:
- كيفية مسح ذاكرة التخزين المؤقت للتصفية (العناصر القديمة) من Pivot Table في Excel؟
- كيفية مسح عوامل التصفية من جميع أوراق العمل في المصنف النشط في Excel؟
- كيفية تصفية البيانات على أساس خانة الاختيار في إكسيل؟
- كيف تملأ سلسلة من الأرقام في عمود قائمة تمت تصفيته في Excel؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!