عادل جلال قام بنشر فبراير 8, 2007 قام بنشر فبراير 8, 2007 هل يمكن تعديل مدى تنفيذ كود دون الدخول للمديول السلام عليكم ورحمة الله وبركاته [sub MacroFil1() Sheets("Adel").Range("a7:r7").Select Selection.AutoFill Destination:=Range("a7:r10") Range("A4").Select End Sub الكود السابق يقوم بتكرار نسخ الصف السابع حتى الصف العاشر بطريقة ألية كما موضح فى المدىRange("a7:r10") أود تكراره حتى الصف العشرين مثلاّ (دون الدخول إلى الموديول ) . أود التعديل فى المديول وربطه بخلية معينة فى أحد أوراق العمل وعندما أريد التعديل فى عدد الصفوف أعدل فقط فى هذه الخلية وهذا العديل يتم مباشرة فى الكود بمعنى جعل رقم 10 مرتبط بخلية فى أحد أوراق العمل أو بأى طريقة أخرى تؤدى المطلوب تحياتى
omar elhosseini قام بنشر فبراير 9, 2007 قام بنشر فبراير 9, 2007 الاخ عادل جلال تحياتى شاهد المرفق test.rar
عادل جلال قام بنشر فبراير 9, 2007 الكاتب قام بنشر فبراير 9, 2007 الأخ/ عمر الحسينى ( أبو تامر ) السلام عليكم ورحمة الله وبركاته اللغة العربية بكل كلماتها و ألفاظها ومعانيها تعجز عن أن تصفك و تشكرك على تعاونك مع تلميذك بارك الله فيك وفى ذريتك وجعله فى ميزان حسناتك بالمناسبة أعتزر لك عن عدم تكملة المحادثة معك عبر الماسنجر وذلك لظرف خارج عن إرادتى وهو إنقطاع التيار الكهرباء وعندما وصلت لم أجدك أتمنى أن تتكرر المحادثة مع تحياتى
عادل جلال قام بنشر فبراير 14, 2007 الكاتب قام بنشر فبراير 14, 2007 الأخ/ عمر الحسينى ( أبو تامر ) السلام عليكم ورحمة الله وبركاته لدى أسم (ADEL) معرف كالأتى:- =OFFSET('الأوائل'!$I$7;0;0;COUNTA('الأوائل'!$I$7:$I$10);1) أود التعديل فى لمدى وربطه بخلية معينة فى أحد أوراق العمل وعندما أريد التعديل فى عدد الصفوف أعدل فقط فى هذه الخلية وهذا العديل يتم مباشرة فى المدى بمعنى جعل رقم 10 مرتبط بخلية فى أحد أوراق العمل أو بأى طريقة أخرى تؤدى المطلوب كما تم فى المشاركة الثانية تحياتى
omar elhosseini قام بنشر فبراير 14, 2007 قام بنشر فبراير 14, 2007 الاخ عادل جلال تحياتى هذه صيغة المدى المتحرك او الديناميكى (Dynamic Named Ranges) ويعمل على تحديد حجم المدى حسب احتوائة على البيانات اى يتمدد وينكمش حسب البيانات التى بداخلة ولكنك اخى العزيز قمت بتحجيم هذا التمدد بتحديد الحد الاقصى لعدد الصفوف ب 10 صفوف فقط فهذا المتغير جعل ليحتوى على الحد الاقصى للبيانات اى اجعلة 1000 مثلا ولكنة عمليا لن يكون حجم المدى الا بنفس حجم البيانات الموجودة به اى اننا اذا ادخلنا عدد الصفوف 1000 صف فى المعادلة وهو الحد الاقصى ولكم عمليا اذا كان عدد الصفوف التى بها بيانات 50 صف مثلا سيكون حجم المدى مطابقا لذلك اى 50 صف اتوماتيكيا واذا اصبح عدد الصفوف التى بها بيانات 30 صف سيتغير المدى اتومانتيكيا ليصبح ايضا 30 صف قم فقط بتغير العدد 10 الى اى اقصى عدد محتمل وسيعمل اتوماتيكى اتمنى انتشار استخدامى بكثرة للمدى الديناميكى بين الاعضاء لما له من فوائد كثيرة وتغنى عن تعديلات كثيرة تحياتى
عادل جلال قام بنشر فبراير 15, 2007 الكاتب قام بنشر فبراير 15, 2007 الأخ/ عمر الحسينى ( أبو تامر ) السلام عليكم ورحمة الله وبركاته بارك الله فيك إذا زاد العدد عن 1000 فماذا نفعل هل يمكن تغير المدى المتحرك بأخر يتم تحديد مداه من خلال خلية فى أحد الأوراق يساوى بالفعل العدد المطلوب كما تم فى الكود ؟ ام لا ملحوظة : الذين يستخدمون هذا البرنامج مجرد مدخلون بيانات ( لم يقدروا على التعديل إذا زاد عن 1000 ) فرجاء التوصل لحل تحياتى
omar elhosseini قام بنشر فبراير 15, 2007 قام بنشر فبراير 15, 2007 الاخ عادل جلال ليكن مفتوحا اجعلة 50000 او 65000 فهذا لن يؤثر فى شئ ولكته يكون جاهزا فقط اذا وصلت البيانات الى هذا الحد
عادل جلال قام بنشر فبراير 15, 2007 الكاتب قام بنشر فبراير 15, 2007 الأخ/ عمر الحسينى ( أبو تامر ) السلام عليكم ورحمة الله وبركاته بارك الله فيك وجعله فى ميزان حسناتك ورزقك الذرية الصالحة تحياتى
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.