السلام عليكم اخواني واساتذتي الكرام
اسعدكم الله واكرمكم لي سؤال
اريد ان اعرف عدد ايام الجمعه بين تاريخين
مثلا التاريخ الاول 1 / 12 / 2011
التاريخ الثاني 20 / 12 / 2011
اريد ان اعرف كم يوم جمعه خلال هذه الفتره
منتظركم وان شاء الله اجد المساعده قريبا
معرفه عدد ايام الجمعه بين تاريخين
السلام عليكم
بسم الله الرحمن الرحيم
اسعدك الله
دون اطالة
تفضل
TheDate = InputBox("dd/mm/yyyy")
Msg = "There are : " & DateDiff("ww", Date, TheDate, vbFriday) & " Fridays"
MsgBox Msg