[عمور2016]

ارجو من الاخوة الزملاء سرعة الرد

كود وسؤال اخر---- في حال جمع الفليكس للعمود( اذا كان بنسبة مئوية% ).كيف يكون ذلك%   كما هو موضح في الصورة
ارجو التعديل في الكود او ايجاد حل لجمع الاعدد بالنسب المئوية10%+12%+30%...........وهكذا
Private Function sum(xcol)
Dim i As Integer
Dim sum1 As Double
sum1 = 0
For i = 1 To MSHFlexGrid1.Rows - 1
sum1 = sum1 + (IIf(MSHFlexGrid1.TextMatrix(i, xcol) = "", 0, MSHFlexGrid1.TextMatrix(i, xcol)))
Next
sum = sum1
End Function