اريد كود جمع خاص بالشيت

[ميدو63]

الزملاء الافاضل

مرفق Workbook به 12 شيت بة 3 مجموعات من الخلايا A & B & C وكل مجموعة بها من الاعمدة اريد تجميع خلايا أعمدة كل مجموعة جمع سليم بدون دمج خلايا اعمدة المجموعة معاَ بالاكواد او بالمعادلات ويتم تطبقة على كل شيت من ال Workbook

اشكركم مقدماَ

J.V1.rar

تم تعديل ديسمبر 9, 2012 بواسطه دغيدى

[ميدو63]

للرفع أنتظارا لرد من الزملاء

[الـعيدروس]

من اين تريد استخراج

القيم الذي تريدها في كل المجموعات

حسب فهمي جرب هذا الكود

Public Sub Sum_Ali()

Dim Sh As Worksheet

Dim Rn As Range

For Each Sh In ThisWorkbook.Worksheets

For i = 13 To 48

Set R = Sh.Range(Sh.Cells(5, i), Sh.Cells(24, i))

Sh.Cells(25, i) = WorksheetFunction.Sum(R)

Next i

Next Sh

End Sub

[ميدو63]

السلام عليكم الاخ / ALIDROOS ( أبو نصار )

اشكرك على ردك الكريم

واريد ان اوضح ان هذه الارقام الموجودة فى A مثلا عبارة عن مبالغ اكتبها فى كل خانة يدويا واريد جمع هذة الارقام فى خانة التجميع بشكل صحيح مثل التجميع اليدوى الذى ذكرتة على سبيا المثال اسفل A أو B أو C مثلا - وارجو ان يكون التعديل على الشيت لعدم درايتى بكتابة الاكواد.

واتمنى ان ان اجد هذا الكود او المعادلة لديك او لدى أحد الزملاء

والشكر موصول لك وللجميع

[الـعيدروس]

السلام عليكم

ان كنت اول مره تتعامل مع الاكواد في الاوفيس تبعك

لاتنس تفعل اعدادات الماكرو من واجهة اعدادات الاكسل

الى منخفض جدا

شاهد المرفقات

J.V1_A.rar

تم تعديل ديسمبر 9, 2012 بواسطه دغيدى

[ميدو63]

استاذى الكريم

السلام عليكم ورحمة الله

أولا : اشكرك على ردك الكريم ومجهودك والمساعدة الكريمة فى الكود

ثانيا: يبدو اننى لم اوضح طلبى بشكل جيد وهو: رفقت صورة بها جزء من الشيت وبه جمع بجوارة رقم (1) وهذا الذى يحدث عند جمع جل خلايايا العمود معا وهذا لا أريدة حيث ان عند الجمع لا ياخذ الرقم الاول ويرحل باقى الجمع الى جمع خلايا العمود المجاور

والجمع الظاهر بجوارة رقم (2) هو الصحيح بالنسبة لى وهذا ما اريدة ان يظهر فى تجميع كل مجموعة الاعمدة فى الجروب A وكذالك عن تجميع الاعمدة فى الجروب B

فمثلا لمجموعة الاعمدة A لو بها مجموعة الارقام التالية

156,156,785.59 2,011,108,416.88 3,212,970,000.00

5,380,235,202.47 هذا هو التجميع الذى اريدة أن يظهر فى الخلايا

اشكرك على سعة صدرك لى

[الـعيدروس]

هذا الرقم كبير 5,380,235,202.47

من اين استخرجته

اذا جمعت ارقام جمع الاعمدة A لن يساوي الرقم اعلاه

ارجو التوضيح اكثر