лист Excel на слайд PowerPoint

using xlNS = Microsoft.Office.Interop.Excel; 
using pptNS = Microsoft.Office.Interop.PowerPoint;
 
pptNS.Application powerpointApplication = null;
pptNS.Presentation pptPresentation = null;
pptNS.Slide pptSlide = null;
pptNS.ShapeRange shapeRange = null;
        
xlNS.Application excelApplication = null;
xlNS.Workbook excelWorkBook = null;
xlNS.Worksheet targetSheet = null;
xlNS.ChartObjects chartObjects = null;
xlNS.ChartObject existingChartObject = null;
                    
string paramPresentationPath;
string paramWorkbookPath;
object paramMissing = Type.Missing;
 
paramPresentationPath = Application.StartupPath + @"\Chart Slide.pptx";
paramWorkbookPath = Application.StartupPath + @"\Chart Data.xlsx";
 
powerpointApplication = new pptNS.Application();
excelApplication = new xlNS.Application();
excelWorkBook = excelApplication.Workbooks.Open(paramWorkbookPath,
                                paramMissing, paramMissing, paramMissing,
                                paramMissing, paramMissing, paramMissing,
                                paramMissing, paramMissing, paramMissing,
                                paramMissing, paramMissing, paramMissing,
                                paramMissing, paramMissing);
targetSheet = (xlNS.Worksheet)(excelWorkBook.Worksheets["list"]);
chartObjects = (xlNS.ChartObjects)(targetSheet.ChartObjects(paramMissing));
existingChartObject = (xlNS.ChartObject)(chartObjects.Item("diagr"));
pptPresentation = powerpointApplication.Presentations.Add(Microsoft.Office.Core.MsoTriState.msoTrue);
pptSlide = pptPresentation.Slides.Add(1, pptNS.PpSlideLayout.ppLayoutBlank);
existingChartObject.Copy();
shapeRange = pptSlide.Shapes.Paste();
shapeRange.Left = 10;
shapeRange.Top = 10;
shapeRange.Width = 500;
shapeRange.Height = 500;
pptPresentation.SaveAs(paramPresentationPath,
                                pptNS.PpSaveAsFileType.ppSaveAsOpenXMLPresentation,
                                Microsoft.Office.Core.MsoTriState.msoTrue);