public static void Main() { Excel.Application ex = new Excel.Application(); ex.Visible = true; Excel.Workbook wb = ex.Workbooks.Add(Excel.XlWBATemplate.xlWBATWorksheet); Excel.Range rg = ex.ActiveCell; rg.set_Item(1, 1, "Competência"); rg.set_Item(1, 2, "Nota"); rg.set_Item(2, 1, "C++"); rg.set_Item(2, 2, "5"); rg.set_Item(3, 1, "UML"); rg.set_Item(3, 2, "6"); rg.set_Item(4, 1, "OOP"); rg.set_Item(4, 2, "5"); rg.set_Item(5, 1, "DB"); rg.set_Item(5, 2, "9"); rg.set_Item(6, 1, ".NET"); rg.set_Item(6, 2, "4"); rg.set_Item(7, 1, "XML"); rg.set_Item(7, 2, "4"); rg.AutoFormat(Excel.XlRangeAutoFormat.xlRangeAutoFormatClassic3, true, true, true, true, true, true); Excel.Chart ch = (Excel.Chart)ex.Charts.Add(Type.Missing, Type.Missing, Type.Missing, Type.Missing); ch.ChartType = Excel.XlChartType.xlRadarFilled; Excel.Worksheet ws = (Excel.Worksheet)ex.Worksheets["Plan1"]; Excel.Range lrg = ws.get_Range("A1", "B7"); ch.SetSourceData(lrg, Excel.XlRowCol.xlColumns); ch.Location(Excel.XlChartLocation.xlLocationAsObject, "Plan1"); ex.ActiveChart.HasLegend = false; ex.ActiveChart.HasTitle = true; ex.ActiveChart.ChartTitle.Text = "Gráfico de Competência"; Console.Write("Pressionar ENTER para sair do EXCEL"); Console.ReadLine(); ex.Quit(); }
public void generateChart(int dataCnt) { //Q CHART Excel.Range chartRange; Excel.ChartObjects xlCharts = (Excel.ChartObjects)qVal.ChartObjects(Type.Missing); Excel.ChartObject myChart = xlCharts.Add(10, 80, 800, 500); Excel.Chart chartPage = myChart.Chart; string range = string.Format("B{0}", dataCnt - 1); string range2 = string.Format("C{0}", dataCnt - 1); chartRange = qVal.get_Range("A1", range); chartPage.SetSourceData(Source: chartRange); chartPage.ChartType = Excel.XlChartType.xlXYScatter; chartPage.HasTitle = true; chartPage.ChartTitle.Text = "Q-Value vs. Time"; chartPage.HasLegend = false; Excel.Axis xaxis = chartPage.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis.HasTitle = true; xaxis.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis.AxisTitle.Text = "Time"; Excel.Axis yaxis = chartPage.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis.HasTitle = true; yaxis.AxisTitle.Text = "Q-Value"; //CENTER FREQ CHART Excel.ChartObjects xlCharts1 = (Excel.ChartObjects)centFreq.ChartObjects(Type.Missing); Excel.ChartObject myChart1 = xlCharts1.Add(10, 80, 800, 500); Excel.Chart chartPage1 = myChart1.Chart; chartRange = centFreq.get_Range("A1", range); chartPage1.SetSourceData(Source: chartRange); chartPage1.ChartType = Excel.XlChartType.xlXYScatter; chartPage1.HasTitle = true; chartPage1.ChartTitle.Text = "Center Frequency vs. Time"; chartPage1.HasLegend = false; Excel.Axis xaxis1 = chartPage1.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis1.HasTitle = true; xaxis1.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis1.AxisTitle.Text = "Time"; Excel.Axis yaxis1 = chartPage1.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis1.HasTitle = true; yaxis1.AxisTitle.Text = "Center Frequency (Hz)"; //ROOM TEMP CHART Excel.ChartObjects xlCharts2 = (Excel.ChartObjects)roomTemp.ChartObjects(Type.Missing); Excel.ChartObject myChart2 = xlCharts2.Add(10, 80, 800, 500); Excel.Chart chartPage2 = myChart2.Chart; chartRange = roomTemp.get_Range("A1", range); chartPage2.SetSourceData(Source: chartRange); chartPage2.ChartType = Excel.XlChartType.xlXYScatter; chartPage2.HasTitle = true; chartPage2.ChartTitle.Text = "Room Temp vs. Time"; chartPage2.HasLegend = false; Excel.Axis xaxis2 = chartPage2.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis2.HasTitle = true; xaxis2.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis2.AxisTitle.Text = "Time"; Excel.Axis yaxis2 = chartPage2.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis2.HasTitle = true; yaxis2.AxisTitle.Text = "Room Temperature (C)"; //CAVITY TEMP CHART Excel.ChartObjects xlCharts3 = (Excel.ChartObjects)cavityTemp.ChartObjects(Type.Missing); Excel.ChartObject myChart3 = xlCharts3.Add(10, 80, 800, 500); Excel.Chart chartPage3 = myChart3.Chart; chartRange = cavityTemp.get_Range("A1", range); chartPage3.SetSourceData(Source: chartRange); chartPage3.ChartType = Excel.XlChartType.xlXYScatter; chartPage3.HasTitle = true; chartPage3.ChartTitle.Text = "Cavity Temp vs. Time"; chartPage3.HasLegend = false; Excel.Axis xaxis3 = chartPage3.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis3.HasTitle = true; xaxis3.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis3.AxisTitle.Text = "Time"; Excel.Axis yaxis3 = chartPage3.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis3.HasTitle = true; yaxis3.AxisTitle.Text = "Cavity Temperature (C)"; //Matlab SVD Q Excel.ChartObjects xlCharts4 = (Excel.ChartObjects)Q_L.ChartObjects(Type.Missing); Excel.ChartObject myChart4 = xlCharts4.Add(10, 80, 800, 500); Excel.Chart chartPage4 = myChart4.Chart; chartRange = Q_L.get_Range("A1", range); chartPage4.SetSourceData(Source: chartRange); chartPage4.ChartType = Excel.XlChartType.xlXYScatter; chartPage4.HasTitle = true; chartPage4.ChartTitle.Text = "Q Loaded vs. Time"; chartPage4.HasLegend = false; Excel.Axis xaxis4 = chartPage4.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis4.HasTitle = true; xaxis4.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis4.AxisTitle.Text = "Time"; Excel.Axis yaxis4 = chartPage4.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis4.HasTitle = true; yaxis4.AxisTitle.Text = "Q Value"; //Matlab SVD Q minus Network Analyzer Excel.ChartObjects xlCharts5 = (Excel.ChartObjects)svd_na.ChartObjects(Type.Missing); Excel.ChartObject myChart5 = xlCharts5.Add(10, 80, 800, 500); Excel.Chart chartPage5 = myChart5.Chart; chartRange = svd_na.get_Range("A1", range2); chartPage5.SetSourceData(Source: chartRange); chartPage5.ChartType = Excel.XlChartType.xlXYScatter; chartPage5.HasTitle = true; chartPage5.ChartTitle.Text = "SVD Q and NA Q vs. Time"; chartPage5.HasLegend = true; Excel.Series series1 = chartPage5.SeriesCollection(1); series1.Name = "NA Q"; Excel.Series series2 = chartPage5.SeriesCollection(2); series2.Name = "SVD Q"; Excel.Axis xaxis5 = chartPage5.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis5.HasTitle = true; xaxis5.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis5.AxisTitle.Text = "Time"; Excel.Axis yaxis5 = chartPage5.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis5.HasTitle = true; yaxis5.AxisTitle.Text = "Q Value"; //Unloaded Q //Matlab SVD Q minus Network Analyzer Excel.ChartObjects xlCharts6 = (Excel.ChartObjects)Q_UL.ChartObjects(Type.Missing); Excel.ChartObject myChart6 = xlCharts6.Add(10, 80, 800, 500); Excel.Chart chartPage6 = myChart6.Chart; chartRange = Q_UL.get_Range("A1", range); chartPage6.SetSourceData(Source: chartRange); chartPage6.ChartType = Excel.XlChartType.xlXYScatter; chartPage6.HasTitle = true; chartPage6.ChartTitle.Text = "Unloaded Q vs. Time"; chartPage6.HasLegend = false; Excel.Axis xaxis6 = chartPage6.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis6.HasTitle = true; xaxis6.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis6.AxisTitle.Text = "Time"; Excel.Axis yaxis6 = chartPage6.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis6.HasTitle = true; yaxis6.AxisTitle.Text = "Unloaded Q"; //SVD Center Frequency //Matlab SVD Q minus Network Analyzer Excel.ChartObjects xlCharts7 = (Excel.ChartObjects)f_center.ChartObjects(Type.Missing); Excel.ChartObject myChart7 = xlCharts7.Add(10, 80, 800, 500); Excel.Chart chartPage7 = myChart7.Chart; chartRange = f_center.get_Range("A1", range); chartPage7.SetSourceData(Source: chartRange); chartPage7.ChartType = Excel.XlChartType.xlXYScatter; chartPage7.HasTitle = true; chartPage7.ChartTitle.Text = "SVD Center Frequency vs. Time"; chartPage7.HasLegend = false; Excel.Axis xaxis7 = chartPage7.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis7.HasTitle = true; xaxis7.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis7.AxisTitle.Text = "Time"; Excel.Axis yaxis7 = chartPage7.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis7.HasTitle = true; yaxis7.AxisTitle.Text = "SVD Center Frequency (GHz)"; //SVD S21 Excel.ChartObjects xlCharts8 = (Excel.ChartObjects)s21.ChartObjects(Type.Missing); Excel.ChartObject myChart8 = xlCharts8.Add(10, 80, 800, 500); Excel.Chart chartPage8 = myChart8.Chart; chartRange = s21.get_Range("A1", range); chartPage8.SetSourceData(Source: chartRange); chartPage8.ChartType = Excel.XlChartType.xlXYScatter; chartPage8.HasTitle = true; chartPage8.ChartTitle.Text = "SVD S21 vs. Time"; chartPage8.HasLegend = false; Excel.Axis xaxis8 = chartPage8.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis8.HasTitle = true; xaxis8.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis8.AxisTitle.Text = "Time"; Excel.Axis yaxis8 = chartPage8.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis8.HasTitle = true; yaxis8.AxisTitle.Text = "S21 (W)"; //SVD vs NA center freq Excel.ChartObjects xlCharts9 = (Excel.ChartObjects)svd_na_center.ChartObjects(Type.Missing); Excel.ChartObject myChart9 = xlCharts9.Add(10, 80, 800, 500); Excel.Chart chartPage9 = myChart9.Chart; chartRange = svd_na_center.get_Range("A1", range2); chartPage9.SetSourceData(Source: chartRange); chartPage9.ChartType = Excel.XlChartType.xlXYScatter; chartPage9.HasTitle = true; chartPage9.ChartTitle.Text = "SVD and NA Center Frequency vs. Time"; chartPage9.HasLegend = true; Excel.Series series3 = chartPage9.SeriesCollection(1); series3.Name = "NA Center Frequency"; Excel.Series series4 = chartPage9.SeriesCollection(2); series4.Name = "SVD Center Frequency"; Excel.Axis xaxis9 = chartPage9.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary); xaxis9.HasTitle = true; xaxis9.TickLabels.NumberFormat = "[h]:mm:ss;@"; xaxis9.AxisTitle.Text = "Time"; Excel.Axis yaxis9 = chartPage9.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary); yaxis9.HasTitle = true; yaxis9.AxisTitle.Text = "Center Frequency (GHz)"; }