nash60 قام بنشر مارس 14, 2013 مشاركة قام بنشر مارس 14, 2013 بسم الله الرحمن الرحيم الاخوة الكرام السلام عليكم ورحمة الله وبركاته : المطلوب تحويل معادلتين الاولى جمع عمودين والثانية جمع عمودين وضربهم برقم ثابت في خلية بنفس الصفحة مطلوب تحويل المعادلتين الى كود بحدث عند تغيير البيانات والملف المرفق موضح به المطلوب . ارجو من الاخوة الافاضل ممن يستطيع المساعدة ان لا يبخل بها واجره على الله والسلام عليكم ورحمة الله وبركاته Test.rar رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر مارس 14, 2013 مشاركة قام بنشر مارس 14, 2013 السلام عليكم جرب هدا ارجو ان يفي بالطلب انشاء الله Test.rar رابط هذا التعليق شارك More sharing options...
nash60 قام بنشر مارس 14, 2013 الكاتب مشاركة قام بنشر مارس 14, 2013 شكرا لك اخي الكريم على تكرمك بالرد ولكن صحيح ان الكود يعمل ولكن هناك أمران مهمان بالنسبة لي 1 - ان الكود لا يعمل عندما اضعه في حدث عند التغيير في الورقة ليعمل اتوماتيكيا عند تحديث البيانات ولا حاجة للزر 2 - ان الكود محدد ب200 صف وتكون الخلايا مملوءة بالاصفار واعتقد انه يمكن تعديلها لتكون محدودة بالجدول فقط ارجو التعديل ان امكن ولكم جزيل الشكر رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر مارس 14, 2013 مشاركة قام بنشر مارس 14, 2013 (معدل) السلام عليكم ضع هدا الكود في حدت Worksheet_SelectionChange For a = 2 To 200 If Cells(a, 1) <> "" Then Cells(a, 46) = "=RC[-27]+RC[-21]" Cells(a, 47) = "=(RC[-26]+RC[-20])*R1C48" End If Next a كما يمكنك زيادة مدى الكود بالزيادة في نهاية المتغير a تم تعديل مارس 14, 2013 بواسطه hoorabie رابط هذا التعليق شارك More sharing options...
nash60 قام بنشر مارس 15, 2013 الكاتب مشاركة قام بنشر مارس 15, 2013 اشكرك اخي الكريم جزيل الشكر وجعله الله في ميزان حسناتك ان شاء الله رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.