محمد عادل عبد الغنى قام بنشر فبراير 5, 2016 مشاركة قام بنشر فبراير 5, 2016 هذا الكود يجعل ملف الاكسيل لا يفتح اتوماتيكا بعد تاريخ معين Private Sub Workbook_Open() Dim DD As Date DD = Format("04/02/2016", "DD/MM/YYYY") If Date > DD Then MsgBox ("This worksheet Expire") ActiveWorkbook.Close End If End Sub Book1.rar رابط هذا التعليق شارك More sharing options...
توكل قام بنشر فبراير 5, 2016 مشاركة قام بنشر فبراير 5, 2016 جزاك الله خيراً هل هناك كود يجعل الملف المفتوح يتحذف بعد 10 دقائق مثلا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.