محمد عبد الناصر قام بنشر ديسمبر 14, 2020 مشاركة قام بنشر ديسمبر 14, 2020 احتاج الى كود يقوم بجمع الخلايا التي بالعمود C على حسب الخلايا المدموجه في العمود B فمثلا من B10 الى B88 لوحات توزيع فرعية مدمجه ان يقوم بجمع الخلايا المجاورة الملف المرفق يوضح المطلوب test2.xlsm رابط هذا التعليق شارك More sharing options...
أفضل إجابة سليم حاصبيا قام بنشر ديسمبر 14, 2020 أفضل إجابة مشاركة قام بنشر ديسمبر 14, 2020 للمرة الألف (اختصار البيانات للتحقق من عمل الكود) الكود الي يعمل على صف واحد يمكنه العمل على الالوف منها هذا الماكرو Option Explicit Sub Merged_Sum() Dim ro, i% ro = Cells(Rows.Count, 2).End(3).Row Dim n% With Range("D6:D" & ro) .ClearContents .Interior.ColorIndex = xlNone End With For i = 6 To ro If Val(Cells(i, 3)) <> 0 Then n = Cells(i, 2).MergeArea.Rows.Count With Cells(i, 4) .Value = Application.Sum(Cells(i, 3).Resize(n)) .Interior.ColorIndex = 6 End With i = i + n - 1 End If Next End Sub الملف مرفق Naser.xlsm 1 1 رابط هذا التعليق شارك More sharing options...
محمد عبد الناصر قام بنشر ديسمبر 14, 2020 الكاتب مشاركة قام بنشر ديسمبر 14, 2020 الكود القديم يقوم باتلاف البيانات في العمود B والعمود c لذا قمت بطلب الكود من جديد اعتذر لك اخي الكريم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان