V80405B - Excel 插入長條圖 - 統計圖

 目的: V80405B - Excel 插入長條圖

處理說明: 1>Worksheet ws2 = wk.Worksheets[2];//獲取第三個工作表 - 缺件統計圖表
                  2> Chart 設定
                       Chart chart = ws2.Charts.Add(ExcelChartType.ColumnClustered);                                                       chart.ChartTitle = "件號2缺件量統計表";
                       chart.DataRange = ws2.Range["A1:B4"];
                       chart.SeriesDataFromRange = false;

1>*.cs

  Worksheet ws2 = wk.Worksheets[2];//獲取第三個工作表 - 缺件統計圖表

  //Sheet2 : 統計圖表                

                ws2.Range[myfunc.GetExcelPos(0, 0)].Text = "件號";

                ws2.Range[myfunc.GetExcelPos(1, 0)].Text = "數量";

                ws2.Range[myfunc.GetExcelPos(0, 1)].Text = "PN1";

                //ws2.Range[myfunc.GetExcelPos(1, 1)].Text = "3";

                ws2.Range[myfunc.GetExcelPos(1, 1)].NumberValue = 3;

                ws2.Range[myfunc.GetExcelPos(1, 1)].NumberFormat = "0.00";

                ws2.Range[myfunc.GetExcelPos(0, 2)].Text = "PN2";

                //ws2.Range[myfunc.GetExcelPos(1, 2)].Text = "2";

                ws2.Range[myfunc.GetExcelPos(1, 2)].NumberValue = 2;

                ws2.Range[myfunc.GetExcelPos(1, 2)].NumberFormat = "0.00";

                ws2.Range[myfunc.GetExcelPos(0, 3)].Text = "PN3";

                //ws2.Range[myfunc.GetExcelPos(1, 3)].Text = "1";

                ws2.Range[myfunc.GetExcelPos(1, 3)].NumberValue = 1;

                ws2.Range[myfunc.GetExcelPos(1, 3)].NumberFormat = "0.00";

                //// new Chart

                Chart chart = ws2.Charts.Add(ExcelChartType.ColumnClustered);

                chart.ChartTitle = "件號2缺件量統計表";

                chart.DataRange = ws2.Range["A1:B4"];

                chart.SeriesDataFromRange = false;

                ////指定圖表所在的位置

                chart.LeftColumn = 5;

                chart.TopRow = 2;

                chart.RightColumn = 15;

                chart.BottomRow = 20;

                wk.ActiveSheetIndex = 0;

                wk.SaveToStream(mstream, FileFormat.Version2007);

                wk.SaveToFile(FileName1, FileFormat.Version2007);