منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] الاكسيل والفيجول بيسك - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] الاكسيل والفيجول بيسك (/showthread.php?tid=27214)

الاكسيل والفيجول بيسك - محمد اسماعيل - 31-10-18

السلام عليكم

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

صورة بالمخطط المطلوب بين راس العمود ومجموعة

[attachment=19968]

اكواد العمليات بالخلايا


كود :
  For I = 2 To excelWorksheet.UsedRange.Rows.Count
                   If String.IsNullOrEmpty(excelWorksheet.Range("b" & I).Value) = False AndAlso String.IsNullOrEmpty(excelWorksheet.Range("c" & I).Value) = False Then
                       excelWorksheet.Range("d" & I).Value = "=b" & I & "-c" & I
                   End If
               Next

اكواد جمع الاعمدة بعد النقل للاكسيل


كود :
excelWorksheet.Range("b" & lRow + 1).Value = "=SUM(b2:b" & lRow & ")"
           excelWorksheet.Range("c" & lRow + 1).Value = "=SUM(c2:c" & lRow & ")"
           excelWorksheet.Range("d" & lRow + 1).Value = "=SUM(d2:d" & lRow & ")"
           excelWorksheet.Range("a" & lRow + 1).Value = "total"


انا برسم المخطط بشرط يمر علي جميع الخلايا وانا اريد فقط العلاقة بين الرؤس الاعمدة ومجاميعها