16-09-16, 06:20 PM
(16-09-16, 06:04 PM)0theghost0 كتب : كود قمت بالبحث على ما وجدة شبيه بماذا اريد وقمت بالتعديل عليه ليكون مناسب لما اريده
الكود يحسب على عدد الساعات فقط يمكنك جعله لمدة 30 يوم اذا اردت فأنا صممته ليكون ليومين فقط
كود :
If Now.Hour > 48 Then
Dim a = MsgBox("End Terial")
If a = vbOK Then
End
End If
End If
قم بتغيير رقم 48 ليناسب ماتريده
48 لمدة يومين
12+12 = 48 ساعة
اي سؤال انا حاظر شباب
12+12=؟
ركز الله يحفظك
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات


