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

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

قام بنشر

السادة المشرفين و الاعضاء الكرم

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

لدي ملف به عدد 30 صفحه نقوم بالتنقل بين الصفحات عن طريق المايكرو

كيف أجبر المستخدم على إكمال بيان 6 خلايا بالصفحة الأولى الرئيسية ثم يعمل المايكرو ومن خلاله يمكن الإنتقال للصفحة الثانية

قام بنشر

السلام عليكم ...

تستطيع عمل ذلك مع الحدث Deactivate ، ضع الكود التالي في الورقة المطلوبة :

Private Sub Worksheet_Deactivate()
     If Me.Range("A1").Value = "" Then Me.Activate
End Sub

الكود السابق لا يسمح لك بالانتقال إلى أي صفحة أخرى مادامت الخلية A1 فارغة .

يمكنك زيادة عدد الشروط حسب الرغبة .

تحياتي :fff:

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information