C# 添加OLE到PPT幻灯片

using Spire.Xls;
using Spire.Presentation;
using System.Drawing;
using Spire.Presentation.Drawing;
using System.IO;

namespace AddOLE
{
    class Program
    {
        static void Main(string[] args)
        {
            //加载Excel文档
            Workbook book = new Workbook();
            book.LoadFromFile("WorkBook.xlsx");

            //选择单元格范围并将其保存为图像
            Image image = book.Worksheets[0].ToImage(1, 1, 4, 3);

            //新建一个PowerPoint文档
            Presentation ppt = new Presentation();

            //插入图像到PowerPoint文档
            IImageData oleImage = ppt.Images.Append(image);
            Rectangle rec = new Rectangle(60, 60, image.Width, image.Height);

            using (MemoryStream ms = new MemoryStream())
            {
                //将Excel数据保存到流
                book.SaveToStream(ms);
                ms.Position = 0;

                //将OLE对象插入到PPT中的第1张幻灯片
                Spire.Presentation.IOleObject oleObject = ppt.Slides[0].Shapes.AppendOleObject("excel", ms.ToArray(), rec);
                oleObject.SubstituteImagePictureFillFormat.Picture.EmbedImage = oleImage;
                oleObject.ProgId = "Excel.Sheet.12";
            }

            //保存文档
            ppt.SaveToFile("AddOLE.pptx", Spire.Presentation.FileFormat.Pptx2013);
            System.Diagnostics.Process.Start("AddOLE.pptx");
        }
    }
}