اذهب الي المحتوي
أوفيسنا

مشكلة في كود الاغلاق


الردود الموصى بها

السلام عليكم اخواني القائمين على هذا المنتدى العظيم

اخواني مشرفي و اعضاء المنتدى

لدي مشكلة في كود الاغلاق تتلخص في الاتي

عندي ملفين اذا كانوا مفتوحين و اردت اغلاق احدهما  أجد الملف الآخر يغلق

و عند فتح احدهما و اردت الخروج منه قبل الدخول فيه اي قبل ما ادخل الباسورد أجد  الملف الاخرالمفتوح و الذي اعمل فيه يغلق ايضاً

المطلوب

عند فتح أو غلق احدهما لا يتأثر الآخر

و جزاكم الله خيرا

حمدي.rar

رابط هذا التعليق
شارك

السلام عليكم و رحمة الله وبركاته

 

جرب التعديل التالي


Private Sub CommandButton2_Click()
If ActiveWorkbook.Name <> ThisWorkbook.Name Then Exit Sub
ActiveWorkbook.save
ThisWorkbook.Close
End Sub

آمل ان يكون به ماتريد

رابط هذا التعليق
شارك

جزاك الله خيرا اخي الاستاذ أحمد زمان

الكود حقق خاصية غلق احد الملفين اذا كانوا مفتوحان معا

لكن اذا كان احد الملفين مفتوحان و اردت فتح الاخر سيظهر فورم الباسورد ثم اردت ان اخرج منه قبل ادخال الباسورد اي قبل الدخول للملف أجد الملف الذي أعمل فيه يغلق معه

أريد عند الخروج من أحد الملفين من فورم الباسورد يظل الملف المفتوح مفتوحاً

أرجو ان أجد الحل و جزاكم الله خيرا

رابط هذا التعليق
شارك

السلام عليكم و رحمة الله وبركاته

اخونا المبدع محمود

خالص تحياتي وتقديري

اسأل الله العلي العظيم ان تكون دائما بخير وسعادة

  • Like 1
رابط هذا التعليق
شارك

  • 2 weeks later...

أخى فى الله

الأستاذ القدير // أحمد زمان

بارك الله فيكم وجزيتم عنى خير الخير 

وأسأل رب العباد أن يحفظكم من كل سوء بسر حفظه لكتابه الحكيم

تقبل منى وافر الاحترام والتقدير

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information