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

حساب عدد مرات تكرار تاريخ معين داخل نطاق


skyblue

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

الاساتذة المشرفين عندي موضوع اعتبره من وجهة نظري مهم جدا وهو لو لدي في العمود 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

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

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