سليم حاصبيا قام بنشر يوليو 15, 2017 قام بنشر يوليو 15, 2017 اضف هذه الفقرة الى الكود مباشرة بعد كلمة Next r Laste_Row = sh.Cells(Rows.Count, "AN").End(3).Row For i = 11 To Laste_Row + 1 Step 2 sh.Range("AN" & i).Resize(, 10).ClearContents Next
علي عبد المنعم قام بنشر يوليو 15, 2017 الكاتب قام بنشر يوليو 15, 2017 شكرا للاستاذ سليم ولكل القائمين على المنتدى
محمود أبوالدهب قام بنشر يوليو 15, 2017 قام بنشر يوليو 15, 2017 شكرا استاذ سليم بس ممكن شرح للكود لى لكى اتعلم من سيادتكم وحتى تزيد المعرفة ايضا
سليم حاصبيا قام بنشر يوليو 15, 2017 قام بنشر يوليو 15, 2017 1 ساعه مضت, محمود أبوالدهب said: شكرا استاذ سليم بس ممكن شرح للكود لى لكى اتعلم من سيادتكم وحتى تزيد المعرفة ايضا شرح الكود explain_code.rar 1
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان