ابو .. عبدالرحمن قام بنشر أبريل 15, 2023 مشاركة قام بنشر أبريل 15, 2023 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته اريد ان اعمل زر يكون داخل الشيت بحيث اذا بغيت اوقف البرنامج يظهر لي user form1 مع اخفاء الشيت ولا يمكن الدخول للشيت الا بعد ادخال اسم المستخدم وكلمة المرور اسم المستخدم m كلمة المرور 1234 المحاسبة والإدارة المالية.xlsb رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 16, 2023 مشاركة قام بنشر أبريل 16, 2023 وعليكم السلام ورحمه الله وبركاته دا كود ل اسم المستخدم وكلمه المرور Private Sub CommandButton1_Click() If TextBox1.Text = "username" And TextBox2.Text = "password" Then MsgBox "Welcome " & TextBox1.Text & "!" Else MsgBox "Invalid username or password, please try again." End If End Sub اتفضل استاذ @ابو .. عبدالرحمن المحاسبة والإدارة المالية.xlsbلعله المطلوب وهذ بكود اخر عند ترك الجهاز ساكن يقوم بعرض ,userfom1 المحاسبة والإدارة المالية.xlsb وهذ الاكواد خاصه بالاستاذ @عبدالله بشير عبدالله له منا كل الاحترام والتقدير رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 18, 2023 الكاتب مشاركة قام بنشر أبريل 18, 2023 اخواني الكرام جزاكم الله خير ولكن المطلوب يمكن اني ما وضحته لكم بالشكل الصحيح ولكن الان برفق لكم الملف نفسه والطلب في الصفحة الرئيسية وشكرا اريد هذا يكون زر ويكون له مدلول بشرطين : 01 في حالة سكون البرنامج دقيقة يفح شاشة الدخول تلقائي ولكن مع مسح اسم المستخدم وكلمة المرور . 02 في حالة الضغط على هذا الزر يفخ شاشة الدخول مع مسح اسم المستخدم وكلمة المرور https://www.raed.net/file?id=205646 رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 29, 2023 الكاتب مشاركة قام بنشر أبريل 29, 2023 السلام عليكم ورحمة الله وبركاته مازلت بالا نتظار رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 29, 2023 مشاركة قام بنشر أبريل 29, 2023 وعليكم السلام ورحمه الله دا كود سكون الشاشه لو يكن 10 ثواني وبعدها يظهر فورم1 واخفاء الشيت https://www.raed.net/file?id=210288 im DownTime As Date Sub SetTimer() DownTime = Now + TimeValue("00:00:10") Application.OnTime EarliestTime:=DownTime, _ Procedure:="ShutDown", Schedule:=True End Sub Sub StopTimer() On Error Resume Next Application.OnTime EarliestTime:=DownTime, _ Procedure:="ShutDown", Schedule:=False End Sub Sub ShutDown() Application.DisplayAlerts = False ' MsgBox "انتهت جلسة العمل يجب التفعيل مرة اخرى " & " " & UserName, , " منظومة النتائج الاساسي والثانوي جميع السنوات الدراسية""" Application.Visible = False UserForm1.Show End Sub رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 (معدل) 23 ساعات مضت, كريم نظيم said: مشكور اخي كريم ولكن يظهر الغلط في هذه الجملة UserForm1.Show نهاية السطر الاخير مدري ويش المشكلة وبعدين مايفتح بعد 10 ثواني وكذلك اذا ضغط زر الشاشة لفتح فيرم اسم المستخدم يبقي اسم المستخدم وكلمة المرور ظاهرة يعني اي واحد يجي بعدي دخل البرنامج من نفس الفيرم لان كلمة اسم المستخدم وكلمة المرور ظاهرة تم تعديل أبريل 30, 2023 بواسطه ابو .. عبدالرحمن رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 30, 2023 مشاركة قام بنشر أبريل 30, 2023 استاذ @ابو .. عبدالرحمن الكود يعمل عندي بكفاءه كما في الصوره رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 الله يعطيك العافية هذه صورة بعد ما فتحت البرنامج ضغط على الزر الخاص باستراحة القهوة الذي خصصناه لشاشة الفيرم الاول كشاشة توقف وامان في حالة الخروج من البرنامج لوقت قصير ثم العودة له عن طريق الفيرم الاول ولكن اسم المستخدم وكلمة المرور لا تنمسح من المربعات الخاصة بها وكذلك خاصية زر الاغلاق من الاكس مازالت تعمل يعني بامكان الشخص اغلاق البرنامج من الاكس ثم فتحه يدخل مباشرة على الشيتات ويستطيع ان يغير او يضيف ما يريد 1 رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 30, 2023 مشاركة قام بنشر أبريل 30, 2023 خاصية زر الاغلاق من الاكس الصق هذه السطر في حدث الفورم Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) Cancel = True End Sub واما لو ظهور اسم المستخدم وكلمه المرور اضف الكود التالي كما في الصوره اعذرني الملف كبير الحجم لم استطيع ارفاقه TextBox1 = " " TextBox2 = " " رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 تمام بيض الله وجهك بجرب وان شاء الله تضبط معي واعذرني على الاطالة 1 رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 30, 2023 مشاركة قام بنشر أبريل 30, 2023 جرب هذا المرفق بعد التعديل لعله المطلوب https://www.raed.net/file?id=210713 رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 ممتاز حبيبي الله يعطيك العافية هذا المطلوب بارك الله فيك بقي حاجة واحدة فقط وهي تفعيل 10 ثواني او 30 ثانية في حالة السكون . وتظهر شاشة الفيرم تلقائي اذا كان ذلك ممكن 1 رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 30, 2023 مشاركة قام بنشر أبريل 30, 2023 11 دقائق مضت, ابو .. عبدالرحمن said: ممتاز حبيبي الله يعطيك العافية هذا المطلوب بارك الله فيك بقي حاجة واحدة فقط وهي تفعيل 10 ثواني او 30 ثانية في حالة السكون . وتظهر شاشة الفيرم تلقائي اذا كان ذلك ممكن عدل في كود الموقت كما تريد نجد في هذا الكود 10 ثواني اترك الجهاز 10 ثواني علي شيت الاكسل بدون الضغط ع اي شي سوف يعمل الكود تلقائي ان شاء الله DownTime = Now + TimeValue("00:00:10") رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 مشكور الله يعطيك العافية بذلت جهد كبير رغم انه لم يتم تفعيل الوقت الا اذا كنت على نفس الفيرم واضغط على زر تشغيل ولكن اشكرك على تعاونك معي وجزاك الله خير 1 رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر أبريل 30, 2023 مشاركة قام بنشر أبريل 30, 2023 (معدل) 37 دقائق مضت, ابو .. عبدالرحمن said: مشكور الله يعطيك العافية بذلت جهد كبير رغم انه لم يتم تفعيل الوقت الا اذا كنت على نفس الفيرم واضغط على زر تشغيل ولكن اشكرك على تعاونك معي وجزاك الله خير الـحَمْدُ للـهِ الَّذِي بِنِعْمَتهِ تَتِمُّ الصَّالِـحَاتُ . مشكور لكلماتك الطيبه .كلنا بنساعد بعض . لم اعلم سبب الكود لم يعمل تلقائي لدليك انتظر ربما نجد من يساعدنا ويعلمنا لنصل الي حل افضل من احد عملاقه المنتدي الكبير تم تعديل أبريل 30, 2023 بواسطه كريم نظيم رابط هذا التعليق شارك More sharing options...
ابو .. عبدالرحمن قام بنشر أبريل 30, 2023 الكاتب مشاركة قام بنشر أبريل 30, 2023 اتوقع بان عدم ظهور الفيرم بعد 10 ثواني ان معادلة الساعة التي يستمر نبضها خلال الوقت هي التي تجعل الشيت او البرنامج في حالة مستمر غير ساكنه لذلك اتوقع انها السبب والله اعلم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان