سؤوال اذا سمحتوا

[Mharee Accounting Albaig]

السلام عليكم ورحمة الله وبركاته 

اني عندي ملف اكسل يحتوي على محرك بحث واضافة اوراق اكسل متضمنة كشف حساب لاي شخص تفتح له صفحة ( زبائن )  وصلت ألآن عدد الصفحات ( شيت ) الى 905 صحفة 

ولقد اصبح الملف عندي ثقيل في الحفظ بحث يتاخر خمس دقائق عند الحفظ لزبون جديد 

هلو يوجد حل لتسريع هذا الملف 

مع الشكر الجزيل 

[أبومروان]

وعليكم السلام ورحمه الله وبركاته 

اكواد لتحسين الاداء 

Sub OptimizePerformance()
    ' إيقاف التحديثات على الشاشة
    Application.ScreenUpdating = False
    ' إيقاف الحسابات التلقائية
    Application.Calculation = xlCalculationManual
    ' إيقاف الأحداث
    Application.EnableEvents = False
    ' إيقاف التنبيهات
    Application.DisplayAlerts = False
    ' إيقاف الحفظ التلقائي
    Application.AutoRecover.Enabled = False
  
    ' إعادة تمكين كافة الإعدادات بعد الانتهاء
    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic
    Application.EnableEvents = True
    Application.DisplayAlerts = True
    Application.AutoRecover.Enabled = True
End Sub

 

[حليم ناصر]

سلام عليكم

اليك مايضاف الى الماكرو لتسريع تنفيذه

تجده في المرفق

للامانة هذا من اعمال  المنتدى جزاهم الله خيرا

لي سؤال الى الاستاذ ابو مروان اين يضع ذاك الماكرو

لتسريع تنفيذ الماكرو.xlsx

[Mharee Accounting Albaig]

شششششششششششششكرا جزاكم الله خيرا 

[أبومروان]

 الحمد لله الذي بِنِعْمَتِهِ تتم الصالحات وبشكره تدوم النعم، والحمدلله الذي بتوفيقه وتيسيره تصلح الأمور وتتم كُبرى النعم