[تمت الاجابه] عدد ايام الشهر الحالي من خلال الكود ..

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

إليك الحل :

Day(DateSerial(Year(Now()), Month(Now()) + 1, 0))

هذه تعيد رقم آخر يوم في الشهر الحالي و بالتالي هو ذاته عدد أيام الشهر

بتوفيق الله

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

لم يضبط معي الحـل ، تظهر رسالة تقول ان فاصلة ناقصة او تعبير خاطئ او اقواس ناقصة وهكذا ...

الدالة لا تعمل معي في مربع النص ..

الدالة صحيحه ولكن عليك ان تجعلها في متغير مثلا

   d = Day(DateSerial(Year(Now()), Month(Now()) + 1, 0))
   MsgBox d

أو

  MsgBox Day(DateSerial(Year(Now()), Month(Now()) + 1, 0))

تحياتي

تفضل الاخ عبدالله مثال على ما طلبت

طبعا هي نفس الاكواد الي حطها الاستاذ عماني

date1.rar

roan27 كتب:

تفضل الاخ عبدالله مثال على ما طلبت

طبعا هي نفس الاكواد الي حطها الاستاذ عماني

تصحيح استاذتي العزيزة

الاكواد وضعها أخونا الاستاذ MoHaMMaD Pro

تحياتي

اسفه

واعتذر لكم جميعا مع الشكر لمن وضع الاكواد ومن صحح الخطاء

جزاكم الله خير اخواني على المساعدة ..

وبارك الله فيكم جميعاً ، والمطلوب كما جاء به اختنا روان ( لجنة تعديل المشاركات ) ..

طيب اذا ممكن إضافة جديدة وهي كيف احذف ايام الجمعة والسبت من المجموع ^^ ..

(( عبدالله )) كتب:

جزاكم الله خير اخواني على المساعدة ..

وبارك الله فيكم جميعاً ، والمطلوب كما جاء به اختنا روان ( لجنة تعديل المشاركات ) ..

طيب اذا ممكن إضافة جديدة وهي كيف احذف ايام الجمعة والسبت من المجموع ^^ ..

راجع هذا الرابط أخي الكريم عبدالله والمشاركة رقم (6) ..

/index.php?showtopic=222808

تحياتي ..