اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

التعديل علي كود اخفاء واظهار الصفوف


الردود الموصى بها

السلام عليكم  لدي ملف به كود للاستاذ محمود الشريف طبعا انا عدلت عليه لكن الكود بطئ جدا وبه بعض المشاكل

مثلا يلخد الكود اكثر من ثلاث دقائق  حتى الانتهاء  وكذلك عندما تريد اظهار المقيدين مثلا وسبق ان اظهرت المنقطعين  الكود لا يعمل

او لا يظهر المقيد ين  ارجو التعديل علي الكود وجزالكم الله خيرا

شئون3.rar

رابط هذا التعليق
شارك

الأخ الحبيب أبو صلاح

أنا جربت الكود الموجود أولا ولم يستغرق معي الوقت الطويل الذي ذكرته استغرق حوالي 5 ثواني

يمكن تكون إمكانيات الجهاز لديك ضعيفة أو ما شابه؟

رابط هذا التعليق
شارك

علي الاطلاق اخي ياسر الجهاز امكانياته عالية جدا بس عندما استدعي المنقطعين فقط ياخذ وقت

رابط هذا التعليق
شارك

الفلترة طبع ايسر بكثير لكن تحتاج اكثر من عمود للفلترة وبالتالي المستخدم للبرنامج يبحث عن اي عمود بدا الفلترة منه ويتوه بين الاعمدة لقلة خبرته

لكن انا وجدت كود رائع ارجو ان تبدي رايك وانا جربته ويعمل بكفاءة

Sub المقيد()
On Error Resume Next
Application.ScreenUpdating = False
Application.Calculation = xlManual
For x = 9 To 308
If Cells(x, 24).Value = "غير مقيد" And Cells(x, 24) <> "" Then
Rows(x).Hidden = True
Else
Rows(x).Hidden = False
End If
Next
Application.Calculation = xlAutomatic
End Sub

تم تعديل بواسطه ابوصلاح
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information