بســم الله الـرحمــن الرحيــم
السلام عليكــم ورحمـة الله وبركاتــة ،،
ارفقت مثال كي تتضح الفكرة معه ملف كريستال ريبورت
المطلوب ببساطة
الكود الذي يظهر البيانات من الجدول حسب اسم الفندق والشهر الموجود بمربع النص
طبعا انا عملت كود يظهر الشهر الحالي في مربع النص
طبعا البرنامج شغال الان وبيجيب البيانات من الجدول حسب اسم الفندق فقط
أرجو تعديل الكود
وكلي شكر لكم
اخي هذا كود الفورمولا حسب المطلوب
Dim d1 As Date
Dim d2 As Date
d1 = Date - Day(Date) + 1
d2 = d1 + 30
txtFormula = "{chart1.Hotel_Name} ='" & Hotel_Name.Text & "' and ({chart1.date_1}>= #" & CDate(Format(d1, "mm/dd/yy")) & "# ) And ({chart1.date_1}<= #" & CDate(Format(d2, "mm/dd/yyyy")) & "# )"تحياتي
OMANI FOR EVER
-------------------------------------------------
-------------------------------------------------
السلام عليكــم ورحمـة الله وبركاتــه ،،
جزاك الله الف خير
ومعذرة لتأخير الرد
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…