اذهب الي المحتوي
أوفيسنا

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

قام بنشر

الاساتذة المشرفين عندي موضوع اعتبره من وجهة نظري مهم جدا وهو لو لدي في العمود D من المدى d4:d30

تواريخ معينة لاشهر السنة .

المطلوب هو التكرم بالتعديل على الملف المرفق بايجاد كود يقوم باستخراج عدد مرات تكرار تاريخ معين .

بحيث لو اخترت اليوم 1 والشهر 5 والسنة 2006

وايضا لو اخترت اليوم 7 والشهر 9 والسنة 2006 ثم اغطت زر يظهر لي عدد المرات التي تكرر فيها التاريخين السابقين

وتقبلوا تحياتي

قام بنشر

الكود التالي ينفذ لك ما تريد،

Sub CountDates()

For R = 4 To 30
If Application.WorksheetFunction.Count(Cells(R, "B"), Cells(R, "C"), Cells(R, "D")) < 3 Then
Cells(R, "E") = ""
Else
Cells(R, "E") = Application.WorksheetFunction.CountIf(Sheet1.[D4:D30], Cells(R, "C") & "/" & Cells(R, "B") & "/" & Cells(R, "D"))
End If
Next

End Sub

شاهد المرفق،

______________________________________________.rar

قام بنشر

:clapping::clapping:

رائع يامشرفنا الحبيب حفظك الله من كل شر .

ومن باب الاستفادةهل يمكن ان نضلل نطاق معين وليكن نفس النطاق السابق والبرنامج اليا يظهر لي جميع التواريخ التي احتواها ذلك النطاق وعدد تكرارها .( دون ان نحدد له التواريخ ) .

والمعذرة لو اني كثرت عليك .

لك مني كل الاحترام والتقدير....

قام بنشر

قم بإخيار خلية واحدة أو مجموعة من الخلايا من القائمة المحتوية على التواريخ في الصفحة الأولى وشاهد النتيجة.

______________________________________________.rar

قام بنشر

استاذ علي مشكور على ردك ولو اني اتعبتك معي فالطريقة جميلة ولكنها تحتاج الى وقت اي ان الاستخدام بهذه الطريقة حيكون يدوي . انا كنت اقصد انني لو ضللت النطاق من d4:d30 ثم ضغطنا على زر الادخال تظهر لي جميع التواريخ التي يحتويها هذا النطاق وامام كل تاريخ عدد تكراره .

لاني فعلا محتاج جدا لهذه الطريقة في الوقت الحالي فعندي بيانات عددها 8490 صف وايجاد طريقة اليه بسرعة تظهر لي التواريخ وتكلرار كل منها سوف يقلل الجهد والوقت لدي .

تحياتي لك يالغالي

قام بنشر

استاذ : علي السحيب بعد التحية حتى تكون الصورة واضحة ارفقت ملف شرحت فيه المطلوب

تحياتي لك

قام بنشر

استاذي واخوي :علي السحيب بيض الله وجهك وحفظك الله من كل شر .

رائع رائع في كل شئ دائما نجدك عند الشدائد وتقف معنا بحلولك المبدعة .

مني لك شكر وتقدير لايوصف

تحياتي

قام بنشر

استاذي :علي السحيب لقد طبقت الملف على تواريخ لدي تخص شهر بالكامل وقد اعطى البرنامج نتائج مذهلة

ولكن لاحظت شيئين على الكود :

1- عندما ادخلت جميع التواريخ وضغطت زر الادخال فانه ياخذ بعض الوقت .

2- عندما انتقل الى sheet2 لمشاهدة النتائج الاحظ ان المؤشر يتحرك بسرعة بشكل وميض لفترة معينة ثم يتوقف . وايضا عندما انتقل الى sheet1 ثم اعود الى sheet2 يعود المؤشر بالوميض مرة اخرى .

لذا ارفقت ملف بذلك حتى تتكرم بالاطلاع على الملف ومعالجة المشكلة .

تحياتي لك

قام بنشر
1- عندما ادخلت جميع التواريخ وضغطت زر الادخال فانه ياخذ بعض الوقت .

أعتقد أن ثلاث أو أربع ثواني ليست كثير على كود يقوم بالبحث داخل أكثر من أربعة آلاف سجل .. أليس كذلك؟؟!!

2

- عندما انتقل الى sheet2 لمشاهدة النتائج الاحظ ان المؤشر يتحرك بسرعة بشكل وميض لفترة معينة ثم يتوقف . وايضا عندما انتقل الى sheet1 ثم اعود الى sheet2 يعود المؤشر بالوميض مرة اخرى .

تم التعديل على الكود،

شاهد المرفق،

_______________________________________________.rar

قام بنشر

:clapping::fff:

أسألك يارب بأسمك الاعظم وبصفاتك العلا أن تفرش لهذا الحبيب دربا من نور ..وتجعل وجهه دائما مسرورا

تحياتي لك

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