أبو هادي

السلام عليكم أي نص تقصد ؟ فإذا كان ما تقصده هو المعادلات الفلكية فلك كل الحق وإن كان ما تقصده الكود الخاص باستخدام تقويم أم القرى فهو موجود بالموقع ومتاح للجميع ولك معلومة على الطاير .. أن تقويم أم القرى عملته من بداية التسعينات يعني قد مضى عليه ما لا يقل عن 9…

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

السلام عليكم الأخ المسعودي تم التعديل على المثال حسب اقتراح الأخ AboSara ولكني اؤيد مقترح الأخ حارث فهو أفضل من عمل ثلاث جداول منفصلة . تحياتي mail.zip

أخي فتى الوادي هناك خطأ واضح وهو أن الدالة تحسب يومي الثلاثاء والجمعة وليس الخميس والجمعة فالخميس بالإنجليزي Thursday وليس Tuesday . كما أننا توصلنا إلى أنه ينبغي إنقاص يوم من تاريخ البداية أو التاريخ الأول حتى يكون من ضمن نطاق الحسبة . ولك تحياتي

أخي أبا هاجر ترى الواحد من يعدي عمر الـ 27 :) تبدأ المشكلات تزيد معه . عموما تنبهت أن الملف الذي أنزلته هو ملفي وليس ملفك بعد التعديل . (استر على ما واجهت) . مع تحيات أخوك أبو هادي

وصلة موضوع آخر له صلة بهذا الموضوع : http://www.arabteam2000.com/vb/showthread....&threadid=21821

الأخ الفاضل أبو هاجر شكرا على التوضيح .. ويبدو أنك أرفقت الملف القديم قبل التعديل : عموما التعديل المقترح لمستخدمي دالة DateDiff هو إنقاص يوم من تاريخ البداية كالتالي : DateDiff("ww", FmDate - 1, ToDate, K) تحياتي

السلام عليكم مثال للمقارنة : datediff.zip

السلام عليكم لقد عملت مقارنة بين دالتي ودالة DateDiff الجاهزة .. آمل منكم تجربتها بأنفسكم واحرصوا على مراجعة يوم الإثنين Monday . Sub How2Use_CountWkDay() Dim FmDate As Variant Dim ToDate As Variant Dim K As Byte FmDate = CDate(DateSerial(2001, 10, 1)) ToDate …

مبارك للفاروق وزيدان الترقية .. وعقبال الإشراف

السلام عليكم الأخ سلطان المقاطي .. يبدو أنك قرأت الخلاصة فقط وهي خلاصة لموضوع كبير جدا وصلت المشاركات فيه المائة وقد بذل أخي حارث جهدا كبيرا في تحليل الموضوع ووضع خلاصة له . أقول قرأت الخلاصة فقط ولكنك كما أعتقد لم تجرب الأمثلة أو تطلع عليها بشكل كاف ، فالموضع…

السلام عليكم تم إضافة الأعوام 1451هـ إلى 1500هـ إلى تقويم أم القرى وهي من حساب تقويمي الفلكي . لقد قارنت السنوات للمرحلة الثالثة من أم القرى مع تقويمي الفلكي ووجدت اختلافا في شهر واحد فقط أي أقل من 1% وبالتحديد 0.30% مما شجعني على إضافة 50 سنة أخرى وهي أفضل بك…

حج مبرور وسعي مشكور بارك الله فيك أخي أبو هاجر .. جهد واضح .. شكرا لكم أخوك أبو هادي

كل عام أخي أشرف وأنت بخير .. وشكرا على سؤالك . والحقيقة أنا مقصر معك وإن شاء الله نعوض تلك الأيام الضائعة ونتواصل أكثر . أخوك أبو هادي

السلام عليكم وهذا حل آخر . http://www.arabteam2000.com/vb/showthread....=&threadid=4615 تحياتي مع ملاحظة فشلي في البحث بإضافة إحدى الكلمات سواء في العنوان أو الموضوع ووصلت له بعد استعراض كل مساهماتي والتجول فيها . لذا آمل من المسئولين التنبه لهذه المشكلة والعم…

السلام عليكم هذا مثال من تصميم الأستاذ حارث ومشاركتي في استخراج الأسابيع التي لا تحتوي على بيانات وهي شبيهة لفكرة الأستاذ المزيني . وكالعادة لقد فشلت في العثور عليه من المنتدى . تحياتي week97.zip

السلام عليكم أخي فهد الدوسرى لقد كتبت عن بعض دوال التاريخ البسيطة في الموضوع التالي : http://www.arabteam2000.com/vb/showthread....&threadid=21559 ويمكنك استخدم دوال نصية لاستخراج اليوم والشهر والسنة لتواريخ النصية مثل : Left() Mid() Right() راجع دوال استخراج …

السلام عليكم توجد دوال للتواريخ سهلة الإستخدام كالتالي : Day(myDate) لاستخراج اليوم من أي تاريخ Month(myDate) لاستخراج الشهر من أي تاريخ Year(myDate) لاستخراج السنة من أي تاريخ ويمكن استخدام دالة استخراج الشهر كالتالي : Dim myDate As Date myDate = date Select …

مبارك أخي أبو هاجر .. فأنت أهل لها وإن لم تأتيك الترقية .

السلام عليكم تم إضافة الأعوام 1451هـ إلى 1500هـ إلى تقويم أم القرى وهي من حساب تقويمي الفلكي . لقد قارنت السنوات للمرحلة الثالثة من أم القرى مع تقويمي الفلكي ووجدت اختلافا في شهر واحد فقط أي أقل من 1% وبالتحديد 0.30% مما شجعني على إضافة 50 سنة أخرى وهي أفضل بك…