Insert Linechart into Powerpoint

During my years in the market analysing business, I have stmbled over situations where clients needed to create charts easy to create, updtae and include into other existing report systems. One of my favorites (as long as Microsoft Office was the primary tools), MSGraph/Chart would fit into any application. Even thouhg not fully supported by Microsoft, I managed to create webbased online reporting solutions with stable and high performence. The direct export functionality to word, excel and powerpoint as full editable objects was highly appriciated by our customers.

I will show a few examples and also attach some of my applications so it would be eaasier to create something on your own:

void InsertLineChart(chartsettings cs, Microsoft.Office.Interop.PowerPoint._Slide oSlide)int i, j;Chart oChart;Axis axis;Chart)oSlide.Shapes.AddOLEObject(cs.MultiPlotx, cs.MultiPloty, cs.chartw, cs.charth, "MSGraph.Chart", "", Microsoft.Office.Core.MsoTriState.msoFalse, "", 0, "", Microsoft.Office.Core.MsoTriState.msoFalse).OLEFormat.Object;//wrdChart.Application.Visible = false; XlRowCol.xlColumns;XlChartType.xlLine;Axis)oChart.Axes(2, 1);for (int dd = 0; dd <= cs.chartdata.GetLength(0) - 1; dd++)for (int de = 0; de <= cs.chartdata.GetLength(1) - 1; de++)"Arial";XlLegendPosition.xlLegendPositionBottom;true;//wrdChart.Legend.Delete();//wrdChart.Width = cs.chartw;//wrdChart.Height = cs.charth;//wrdChart.Height = 666;//oShape.Height = oWord.InchesToPoints(3.57f);

{

Microsoft.Office.Interop.Graph.

oChart = (Microsoft.Office.Interop.Graph.

oChart.Application.PlotBy = Microsoft.Office.Interop.Graph.

oChart.ChartType = Microsoft.Office.Interop.Graph.

axis = (Microsoft.Office.Interop.Graph.

oChart.Application.DataSheet.Cells.Clear();

{

oChart.Application.DataSheet.Cells[dd + 1, de + 1] = cs.chartdata.GetValue(dd, de);

}

SetMSGraphChartArea(oChart, cs);

SetMSGraphPlotArea(oChart, cs);

axis.MaximumScale = cs.scalemax;

axis.MajorUnit = cs.scalestep;

axis.MinimumScale = cs.scalemin;

axis.TickLabels.Font.Size = 8;

axis.TickLabels.Font.Name =

oChart.Legend.Position = Microsoft.Office.Interop.Graph.

oChart.HasTitle =

oChart.ChartTitle.Text = cs.charttitle;

public

oChart.Application.Update();

oChart.Application.Quit();

}