help!!counts unique combinations within date range

[Ameera]

slam

i am struggling so hard with excel VBA,

i am trying to write a code that counts unique combinations within date range that the user enters from a VBA form (frmSummary) ,,

i have the Visits sheet :

BOOKINGID date clientID petID

1 22/10/2010 1 1

2 23/11/2010 1 2

3 24/11/2010 3 2

4 25/12/2010 2 1

5 26/12/2010 1 1

the pet id is based on the client id,,each client has pets

i want to count the number of pets that visited the clinic,,,( unique combination of clienID and petId)

within a date range that user specified from text box(txtStartDate, txtEndDate)

the count result will be displayed in (summary) worksheet in cell "B6"

am sooooo depressed with this pleeease heeelp me!

thaanx

[بن علية حاجي]

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

هل هذا هو المطلوب؟؟

أخوك بن علية

Classeur1.rar

[Ameera]

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

شكرا جزيييلا اخي الكريم..جعلها الله في ميزان حسنااتك وفرج عنك كروبك

واقعا كنت قد ارفقت الملف سابقا والظاهر انه لم يرفع

على كل حال

الحل الذي قمت بعمله هو بطريقة ال functions

ولكنني ابحث عن حل بطريقة VBA coding

لان جدول ال visists ممكن ان يكبر او يقل بناء على user form

هل يمكن ان احول الحل الذي تفضلت به الى VBA code

اضافة الى ذلك.. يجب ان يحسب ال pets في تواريخ معينة

range

الفترة تكون عبارة عن

startdate ..end date

والتي يدخلها ال user عن طريق user form

petsFirst_21813507.zip

[بن علية حاجي]

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

أختي الكريمة، في الحقيقة ما زلت لا أفهم المطلوب، بالنسبة للمعادلات ليس شرطا أن تكون في الكود وقد وضعتها في ورقة Summary وقمت أيضا بتغيير في ورقة Visits بإضافة عمود به معادلة والجدول وضعته على شكل قائمة وتتمدد المعادلات المضافة في هذا العمود الجديد تلقائيا كل ما زادت الأسطر في الجدول... إليك الملف المرفق وبه التعديلات الجديدة وأنا أنتظر الملاحظات عليه بعد مراقبته...

أخوك بن علية

petsFirst_21813507.rar

[Ameera]

شكررررررررا جزيييييلا اخي الكريم لا استطيع ان اعبر عن امتناني لك كثيرا ..جعلها الله في ميزان حسناتك وفرج عنك همومك

ولكن استميحك عذرا لدي سؤال او مشكلة اخرى واطمع في مساعدتكم

عند الضغط على زر display pet list في القائمة الرئيسية فانه يجب عرض قائمة ب كل ال pets للزبون في ورقة report1 وقد توصلت الى الحل ويمكنك الاطلاع عليه من خلال تشغيل vba code ل frmPetList

ولكن ينقصني ان اوجد مجموع تكلفة كل pet في اخر عمود من القائمة وذلك بجمع عمود ال charge في ورقة visits لكل pet

هذا هو نص السؤال والجزئية الناقصة مظللة:

a button to display a list on seperate worksheet of all pets for a specific client .the worksheet should be named (Report1)

* first prompt the user for the client id

*the resulting worksheet(report1) should show the client full name as the heading followed by a list of all pets for the selected client (a client may have one or several pet). the list should display pets name, typembreed,and total costfor the pet (this should be the total cost of all visits for that pet)_

* there should be an option to view the list in print preview mode

*there should be an option to return to the main menue

* when the user returns to the main menue. the data should be cleared from report1 worksheet

مع االشكر الجزيل والامتنان

[بن علية حاجي]

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

أختي الكريمة، لست أدري إن كنت قد فهمت المطلوب ولكني أقدم هذا العمل الذي قمت فيه ببعض التغييرات على الكود خاصتك في إنشاء ورقة Report1 (مسح محتويات بعض الخلايا للورقة، إدراج دالة الإحصاء وتنسيق وحدة charge...) وفي الورقة بعض التنسيقات للخلايا (تأطير الخلايا المملوءة).

وإن شاء الله يكون هذا المطلوب...

أخوك بن علية

petsFirst_21813507_2.rar

[Ameera]

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

شكراااا جزيلا اخي الكريم وعذرا كنت قد وضعت رد ولكن اتوقع بان خطأ ما قد حدث او لم اعتمد الرد

اشكرك جزيل الشكر على مساعدتك وجهودك وفقك الله ويسر امورك ان شاء الله وفرج همومك وهموم الامة جمعاء..

تحياتي لك اخي الكريم