[محمد اسماعيل]

السلام عليكم

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

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

   

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

كود :

  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"

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