مشكلة طرح عددين في الاكسل واستبدال النتيجة محل أحد العددين المطروحين

السلام عليكم ورحمة الله وبركاته إخوتي أواجه مشكلة لا أعرف كيف يتم تفاديها مع الاكسل وخصوصا عند البرمجة باستخدام كود VBA والمشكلة لخصتها بالصور و كذلك أرفقت الملف الذي استخدمه

.

.

.

.

.

.

.

.

الملف مضغوط