السلام عليكم
مرحبا إخواني
لدي استفسار بخصوص كود VBA في الاكسل .. حيث أود عمل جدول أدخل من خلاله أرقام بحيث يشترط أن لا يكون الرقم أكبر من 10 ولا أصغر من الصفر وأن يكون العدد صحيحاً لا يقبل الاعداد العشرية وفي حال وضع رقم يخالف هذين الشرطين وبمجرد محاولة الانتقال للخلية الثانية يظهر لدي Msgbox به خيارين إما إلغاء الرقم المدخل أو إعادة المحاولة بحيث يمسح الرقم السابق ويظل مؤشر الماوس في نفس الخلية حتى يتم ادخال الرقم الصحيح بحيث ينطبق هذا الشرط على كل العمود مثلا العمود A والعمود B وهكذا
وهذه صورة توضيحية لمقصدي

وهنا الملف أرفقه لكم
أرجو أن أجد المساعدة منكم وللعلم فهو لا يخص الدراسة ولكن وجدت صديق لي يبحث عن الموضوع وأردت تعلمها من خلال الانترنت ولكن لم أفلح كثيراً