كيف ادخل كمية خلية يتم جمع الكيه السابقه

[maryabdlnour]

عندي الحقول التالية في ورقة عمل

في الحقل A اسم المادة

في الحقل B الكمية

اريد الطلب التالي:

كلما ادخل كمية مادة في الخلية B يتم فيها جمع الكمية السابقة و الكمية الحالية في الخلية C

أي اذا كان في الخلية B2 كمية مثلاً 20

يجب أن يكون في الخلية C2 كمية 20

إذا عدلنا الخلية B2 أي وضعنا كمية جديدة فيها مثلاً 30

تصبح الخلية C2 مثلاً 50 و هكذا

كلما عدلنا الكمية في الخلية B2 يتم تعديل تلقائياً الخلية C2 الى القيمة القديمة + القيمة الجديدة

الرجاء المساعدة

[نزار سليمان عيد]

maryabdlnour

اليك المرفق و ان شاء الله يكون المطلوب

_______.rar

[ابو اسامة العينبوسي]

ممكن تستفيد من هذا الكود

Private Sub Worksheet_Change(ByVal Target As Range)

Application.ScreenUpdating = False
Dim My_Value
If Target.Address = "$A$1" Then
Range("A1").Select
My_Value = ActiveCell.Value
Range("B1").Select
ActiveCell.FormulaR1C1 = ActiveCell.Value + My_Value
End If
End Sub

تم تعديل أغسطس 17, 2007 بواسطه هادى سالم

[maryabdlnour]

عزيزي السيد ابو اسامة العينبوسي

شكراً جزيلاً على الكود وهو طلبي و لكن

هذا الكود مخصص فقط للخلية A1 و B1

هل يمكن تعديل الكود بحيث اذا كانت الخلية المحددة A1 يتم الزيادة على B1

و اذا كنا على الخلية A2 يتم الزيادة على الخلية B2

و اذا كانت الخلية المحددة A3 يتم الزيادة على الخلية B3 و هكذا.......الخ

مع جزيل الشكر لك و لكل من مر على طلبي