ابن بنها قام بنشر يوليو 20, 2012 مشاركة قام بنشر يوليو 20, 2012 كل عام وحضراتكم بخير هذا ملف به كود نسخ صفوف مع الاحتفاظ بالمعادلات والتنسيقات للعلامة خبور خير ولكني اريد ان يعمل عند الضغط على اي زر مع الصقحتين معا في نفس الوقت نسخ صفوف بالعدد.rar رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 22, 2012 الكاتب مشاركة قام بنشر يوليو 22, 2012 للرفع رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر يوليو 22, 2012 مشاركة قام بنشر يوليو 22, 2012 اي صفحتين رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 22, 2012 الكاتب مشاركة قام بنشر يوليو 22, 2012 كل عام وحضرتك بخير الصفحتان هما صفحة الشيت وصفحة sheet1 رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 22, 2012 مشاركة قام بنشر يوليو 22, 2012 السلام عليكم هل تقصد هكذا نسخ صفوف بالعدد1.rar رابط هذا التعليق شارك More sharing options...
علي فاهم قام بنشر يوليو 22, 2012 مشاركة قام بنشر يوليو 22, 2012 كل عام وحضراتكم بخير أعجبني هذا الكود وإضافة الأستاذ رجب عليه الرائعة ولكن ... أريد أن أعرف 1- إذا تم تغير صف البداية وليكن الصف العشرون مثلاً أين التغيير في الكود ؟ 2- إذا أردت إضافة صفحة أخرى وتعمل مع الكود ولتكن شيت 2 .. فما هي الإضافة التي أضيفها ؟ وشكراً رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 23, 2012 الكاتب مشاركة قام بنشر يوليو 23, 2012 السلام عليكم هل تقصد هكذا جزاك الله كل خير نعم اقصد ماقدمته ولكن يبقى سؤال غند اضافة اوراق اخرى ونريد ان تعمل مع الكود .. ماهي الاضافه التي نضيفها في الكود ؟ رابط هذا التعليق شارك More sharing options...
علي فاهم قام بنشر يوليو 23, 2012 مشاركة قام بنشر يوليو 23, 2012 للرفع رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 23, 2012 مشاركة قام بنشر يوليو 23, 2012 أخى الفاضل / alyfahem أول تغير يكون فى السطر التالى Const A As Integer = 15 حيث يستبدل الرقم 15 بالرقم 22 التغيير الثانى يكون فى السطر التالى وهو الذى يقصده أيضا أخى الفاضل ابن بنها For i = 2 To 3 حيث يستبدل الرقم 3 بالرقم 4 رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 24, 2012 الكاتب مشاركة قام بنشر يوليو 24, 2012 اخي الكريم الاستاذ رجب جزاك الله خيرا وكل عام وانت طيب غند اضافة اوراق اخرى ونريد ان تعمل مع الكود .. ماهي الاضافه التي نضيفها في الكود ؟ اقتباس معذره في صياغة سؤالي لاني كنت اقصد الملف به كثير من الاوراق وكنت اريد عمل الكود في اوراق محددة من الملف .. ادعو الله ان اكون وصلت الفكره رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 24, 2012 مشاركة قام بنشر يوليو 24, 2012 أخى الفاضل يفضل فى هذه الحالة ارفاق ملف للعمل عليه رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 24, 2012 الكاتب مشاركة قام بنشر يوليو 24, 2012 اشكرك اخي الاستاذ رجب لمتابعتك معي ومع الجميع بارك الله لك هذا الرابط به الملف الجميل المطلوب عمل الكود فيه في صفحة بانات اساسيه فيى الخليه اف 5 سنعمل معادله لايجاد عدد الطلاب ومن هذا العدد ستكون عدد صفوف كل من الصفحات التاليه ... رصد درجات - الشيت - مراجعه - كشوف تبييض الناجحين - وكشوف تبييض الراسبين - كنترول 2012 رجب جاويش. رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 24, 2012 مشاركة قام بنشر يوليو 24, 2012 تفضل أخى كنترول 2012 رجب جاويش.rar رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 24, 2012 الكاتب مشاركة قام بنشر يوليو 24, 2012 اخي الاستاذ رجب جزاك الله الف خير For i = 3To 8 لاادري لماذا لاتعمل في الصفحات التي زدتها Sheets(i).Range(Cells(A, 1), Cells(Rows.Count, 5)).EntireRow.Delete مامعنى الرقم 5 هنا رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 24, 2012 مشاركة قام بنشر يوليو 24, 2012 أخى الفاضل هذه العملية تعتمد على ترتيب الصفحات أى لابد أن تكون الصفحات التى يتم تنفيذ الكود فيها بنفس أرقام حلقة التكرار For i = 3To 8 والرقم 5 يعنى العمود الخامس رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 25, 2012 الكاتب مشاركة قام بنشر يوليو 25, 2012 أخى الفاضل هذه العملية تعتمد على ترتيب الصفحات أى لابد أن تكون الصفحات التى يتم تنفيذ الكود فيها بنفس أرقام حلقة التكرار For i = 3To 8 والرقم 5 يعنى العمود الخامس اخي الاستاذ رجب بارك الله لك لو سمحت غير في الكود الى الرقم 8 ستجد ان الكود ينفذ المطلوب ماعدا الصفحات الزياده تاتي بصف واحد == بالنسبه للرقم 5 وهو يعني العمود الخامس هل تقصد ان المسح يتم حتى العمود الخامس فقط رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 25, 2012 مشاركة قام بنشر يوليو 25, 2012 أخى الفاضل هذا الخطأ يحدث لأن الخلية A14 فى الصفحة السابعة والثامنة فارغة ضع فيها أى رقم أو دالة للترقيم مثل الصفحات الأخرى سيعمل الكود بدون أى مشاكل أما الرقم 5 وهو يعنى العمود الخامس فعلا لكن يتم حذف الصف بكاملة ويمكنك تغيرة الى رقم آخر دون مشاكل ( المهم وجود مدى معين فقط ) رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر يوليو 26, 2012 الكاتب مشاركة قام بنشر يوليو 26, 2012 أما الرقم 5 وهو يعنى العمود الخامس فعلا لكن يتم حذف الصف بكاملة ويمكنك تغيرة الى رقم آخر دون مشاكل ( المهم وجود مدى معين فقط ) ... اقتباس معذره اخي الفاضل السطر الاول اريد مزيد من التوضيح له السطر التاني هل معناه ان المدى هنا الى العمود الخامس فقط رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يوليو 26, 2012 مشاركة قام بنشر يوليو 26, 2012 فكرة حذف الصف كله تعتمد على الجزء الأخير من هذا السطر Sheets(i).Range(Cells(A, 1), Cells(Rows.Count, 5)).EntireRow.Delete وهو الجزء EntireRow.Delete وهو يعنى حذف كامل الصف الذى يوجد به المدى المحدد فى الجزء الأول من السطر رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر أغسطس 7, 2012 الكاتب مشاركة قام بنشر أغسطس 7, 2012 ملحوظه غريبه في الكود تظهر دائما منطقة سوداء بعد نسخ الصفوف .. اجو الحل سؤال.rar رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر أغسطس 7, 2012 مشاركة قام بنشر أغسطس 7, 2012 تفضل أخى سؤال.rar رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر أغسطس 7, 2012 الكاتب مشاركة قام بنشر أغسطس 7, 2012 تمام الله يبارك لك ايه كانت المشكله كنت قد وعدتنا بعمل كنترول جيد للابتدائي مثل الاعدادي نستسمحك في البدء به رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر أغسطس 7, 2012 مشاركة قام بنشر أغسطس 7, 2012 أخى الفاضل لم تكن هناك مشكلة كانت خلايا ملونة بشكل عادى وأزلت ألوانها فقط أما بالنسبة لكنترول الاعدادى فقد استغرق منى شهور أثناء عمله ومجهود كثير جدا وخاصة أننى كنت فى بداية عهدى بالأكواد فاعذرنى أخى لأنه يحتاج الى وقت وتفرغ ذهنى غير موجود حاليا لكن ممكن خطوة خطوة مع بعض وأى تعديل أنا تحت أمرك فيه رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر أغسطس 7, 2012 الكاتب مشاركة قام بنشر أغسطس 7, 2012 لكن ممكن خطوة خطوة مع بعض وأى تعديل أنا تحت أمرك فيه الأمر لله بارك الله فيك الملف المرفق في صفحة الرصد اريد ربط الزراير بالاكواد مع ملحوظة ازاله الزراير التي عندما اضغط عليها بيمين الماوس لاتعمل وربط صفحة الرصد بالصفحة الاصليه الشيت بدايه.rar رابط هذا التعليق شارك More sharing options...
ابن بنها قام بنشر أغسطس 9, 2012 الكاتب مشاركة قام بنشر أغسطس 9, 2012 لو سمحت يا استاذ رجب اربط ولو زر واحد وانا اكمل الباقي على منواله بشرط ان يكون الزر من النوع الذي اذا ضعط عليه بيمين تاماوس تظهر قائمة رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان