Mohamed Hamada22 قام بنشر أبريل 9, 2023 مشاركة قام بنشر أبريل 9, 2023 السلام عليكم ورحمة الله وبركاته رمضان كريم على الاخوة جميعا ممكن لو سمحتو المساعدة كيفية اظهار يوزرفورم فى اكسيل اوتوماتيكياً عند انقطاع الانترنت رابط هذا التعليق شارك More sharing options...
أفضل إجابة lionheart قام بنشر أبريل 9, 2023 أفضل إجابة مشاركة قام بنشر أبريل 9, 2023 (معدل) In standard module Private Declare Function IsNetworkAlive Lib "Sensapi" (lpdwFlags As Long) As Long Sub CheckInternetConnection() If Not IsInternetConnected() Then UserForm1.Show Application.OnTime Now + TimeValue("00:00:10"), "CheckInternetConnection" End Sub Public Function IsInternetConnected() As Boolean Dim lngAlive If IsNetworkAlive(lngAlive) = 1 Then IsInternetConnected = True End Function In workbook module Private Sub Workbook_Open() Application.OnTime Now + TimeValue("00:00:10"), "CheckInternetConnection" End Sub تم تعديل أبريل 9, 2023 بواسطه lionheart 1 1 رابط هذا التعليق شارك More sharing options...
Mohamed Hamada22 قام بنشر أبريل 10, 2023 الكاتب مشاركة قام بنشر أبريل 10, 2023 ماشاء الله عليك الف شكر تعبت معايا معلش سامحنى اخى الكريم فى حاجه تانيه لو عندى برنامج مصمم على اكسيل كيفية اظهار يوزرفورم اذا كان الجهاز فى حالة السكون بمعنى انى ما اشتغلتش على البرنامج وليكن لمدة ربع ساعة ازاى اول ما امسك الماوس يظهرلى يوزرفورم معين انا محددهوله رابط هذا التعليق شارك More sharing options...
lionheart قام بنشر أبريل 10, 2023 مشاركة قام بنشر أبريل 10, 2023 Post a new topic for the new question رابط هذا التعليق شارك More sharing options...
الردود الموصى بها