التعديل على كود ترحيل حسب الصفحات

[محمد عدنان]

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

الملف التالي تم عمل الكود بفضل الله من قبل الاستاذ @محي الدين ابو البشر  و جزاه الله كل خير 

البرنامج بحاجة لتعديل وترحيل المادة الدراسية يجب ان تكون على الصفحة الني تلي صفحة الاسماء ( الصفحات الفردية ) 

سؤال ما هي كود التعديل على الماكرو   و ما هو سطر المسح في كود المسح 

الماكرو بالملف المرفق 

مع الانتباه لتسلسل الصفحات ( صفحة اسماء و الصفحة التالية المادة الدراسية )

اقتباس

 .Cells(x - 6 - c, 15) = mat   السطر الذي بحاجة الى تعديل 

 

k2023.xlsm

تم تعديل ديسمبر 29, 2022 بواسطه محمد عدنان

[محي الدين ابو البشر]

عليكم السلام وارحمة وكل عام وأنتم بألف خير

أخي الكريم

في كود الترحيل
.Cells(x + 1, 15) = mat


وفي كود المسح
 myArea(28, 15) = ""

ولك تحياتي

[محمد عدنان]

السلام عليكم 

اخ @محي الدين ابو البشر جزاك الله كل خير