تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اريد كود جمع خليتين في خلية ثالثة
#1
اناعندي داا جريد بها ثلاث خلايا اريد جمع الخلية الاولي مع الخلية الثانية في الخلية الثالثة بناء علي شرط

يعني الشرط جمع القيم التي تكون اكبر من 14من الخلية الاولي اما الاقل يتم تجاهلها االخلية الاولي يعني قيم العمود الاول والثانية قيم العمود الثااني والثالثة قيم العمود الثالث

الخلية الاولي :الخلية الثانية : الخلية الثالثة

2 : 5 لاتجمع
42 : 4 46
16 : 3 19
الرد }}}
تم الشكر بواسطة:
#2
كود :
dim x, y,z as integer
for i as integer = 0 to datagridview1.rowcount-1
if datagridview1.rows(i).cells(0).value > 14 then
x = datagridview1.rows(i).cells(0).value
y = datagridview1.rows(i).cells(1).value
z = x+y
else
z = datagridview1.rows(i).cells(1).value
end if
datagridview1.rows(i).cells(2).value = z
x = 0
y = 0
z = 0
next
الرد }}}
تم الشكر بواسطة:
#3
اخي مشكورجدا الكود شغال وتمام

واريد تحديد اول عشرة صفوف فقط بالعملية كلها وليس كل صفوف الداتا جريد
او اختيار عدد محدد من الصفوف

واريد ابقاء المتغيرات كما هي علية وليس صفرا يعني الصفوف التي لم تجمع تبقي باعدادها وليس صفرا
الرد }}}
تم الشكر بواسطة:
#4
بالنسبة للسؤال الأول عدل جملة الدوران بالعدد الذي تريده

مثلا لو أردت أول عشرة صفوف

for i as integer = 0 to 9

أما بالنسبة للسؤال الثاني ففي نهاية الكود

x = 0
y = 0
z = 0

احذف الثلاث سطور السابقة حتى تحتفظ بقيمتها
الرد }}}
تم الشكر بواسطة:
#5
اخي وضح اكتر بخصوص توضيح عدد الصفوف
For i As Integer = 0 To DataGridView1.RowCount - 1
ويوضع فين العداد دة
for i as integer = 0 to 9
العدد الخاص باول عشرة صفوف انتا كدة تقصد حلقة اخري داخل الحلقة ياريت تكمل الكود كلة مع بعض لان الامور مش وضحة معايا
الجزء الثاني انا عدلتة واشتغل معايا كويس وهو ثبات قيم المتغيرات الاخري
انا حاولت بالاكواد دية و
Dim x, y, z As Integer
For i As Integer = 0 To DataGridView1.RowCount - 1
For b As Integer = 0 To 10
If DataGridView1.Rows(i).Cells(2).Value < 14 Then
x = DataGridView1.Rows(i).Cells(2).Value
y = DataGridView1.Rows(i).Cells(3).Value

z = x + y
DataGridView1.Rows(i).Cells(4).Value = z
next
next
الرد }}}
تم الشكر بواسطة:
#6
لو عاوز فقط أول 10 صفوف وكذلك عدم تصفير القيم

عدل الكود للتالي
كود :
dim x, y,z as integer
for i as integer = 0 to 9
if datagridview1.rows(i).cells(0).value > 14 then
x += datagridview1.rows(i).cells(0).value
y += datagridview1.rows(i).cells(1).value
z += x+y
else
z += datagridview1.rows(i).cells(1).value
end if
datagridview1.rows(i).cells(2).value = z
next
الرد }}}
تم الشكر بواسطة:
#7
مشكور جدا اخي الاكواد شغالة 1000*100
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] اريد طباعة تقرير ريبورت فيو مباشرة فور عرض التقرير mh66 1 562 22-03-25, 09:59 AM
آخر رد: mh66
  اريد كود لو سمحتم خالد كامل1 10 1,224 15-02-25, 02:15 PM
آخر رد: خالد كامل1
  اريد كود معين اثابكم الله خالد كامل1 1 456 04-02-25, 09:28 PM
آخر رد: aliday03
  اريد كود يحذف جميع سجلات جدول بقاعدة بيانات اكسس دفعه واحده khalidalwdi 2 640 18-11-24, 01:02 AM
آخر رد: rdxdz
  اريد جلب عدد محدد من السجلات من قاعدة بيانات اكسس الى الداتا قراد فيو يوجد مثال khalidalwdi 2 669 12-11-24, 12:19 PM
آخر رد: khalidalwdi
  [VB.NET] طلب كود vba اكسل يقوم بنسخ خلية من قائمة ثم لصقها في خلية اخرى Faisal_kg 0 373 25-10-24, 09:13 PM
آخر رد: Faisal_kg
  [نقاش] اريد مسااعدة انا مبتدئة ف بحر غارق?? ..N 1 349 29-09-24, 11:16 PM
آخر رد: justforit
  [سؤال] تنفيذ عدة أوامر مختلفة في خلية DGV عند الضغط بعدة أزرار Mohamd Mercy To TheWorlds 0 272 10-09-24, 08:26 AM
آخر رد: Mohamd Mercy To TheWorlds
Exclamation [VB.NET] اريد كود لتصدير البيانات من DataGridView الى ملف Excel zazasami 1 498 04-08-24, 09:15 PM
آخر رد: mrfenix93
  اريد إحصاء مجموع التأخير والغياب للموظف أبووسم 2 449 31-07-24, 02:16 PM
آخر رد: أبووسم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم