玄铁剑

成功的途径:抄,创造,研究,发明...
posts - 128, comments - 42, trackbacks - 0, articles - 174

Excel中插入图

Posted on 2009-07-04 21:19 玄铁剑 阅读(219) 评论(0)  编辑 收藏 引用 所属分类: ASP.NET相关

Object o = Type.Missing;
Microsoft.Office.Interop.Excel.Application objExcelApp = new Microsoft.Office.Interop.Excel.Application();
objExcelApp.DisplayAlerts = false;
objExcelApp.Visible = false;
Workbook objWorkbook = objExcelApp.Workbooks.Open("E:\\Book1.xls", o, o, o, o, o, o, o, o, o, o, o, o, o, o);
Worksheet objWorksheet = (Worksheet)objWorkbook.ActiveSheet;
Shapes objShapes = objWorksheet.Shapes;
int shapesCount = objShapes.Count;
PictureBox objPictureBox = new PictureBox();
Range objRange;
for (int i = 1; i < shapesCount; i++)
{
    objShapes.Item(i).CopyPicture(Appearance.Button, XlCopyPictureFormat.xlBITmap);
    IDataObject objIDO = (IDataObject)CliPBoard.GetDataObject();
    if (objIDO.GetDataPresent(DataFormats.BITmap))
    {
        objPictureBox.Image = (Bitmap)objIDO.GetData(DataFormats.BITmap);
        objPictureBox.Image.Save("E:\\" + i+ ".jpg");
    }
    else
    {
        objPictureBox.Image = null;
    }
}
objExcelApp.QuIT();
objExcelApp = null;    .


worksheetGrid.Shapes.AddPicture(PicturePath,
Microsoft.Office.Core.MsoTriState.msoFalse, Microsoft.Office.Core.MsoTriState.msoTrue,
picLeft, picTop, 155, 155);
MS要将OFFICE11的参考加入.才能引用的

调用方法:

<!--StartFragment-->MengXianhui.Utility.ExcelReport.InsertPictureToExcel ipt = new MengXianhui.Utility.ExcelReport.InsertPictureToExcel();
ipt.Open();
ipt.InsertPicture("B2", @"C:\Excellogo.gif");
ipt.InsertPicture("B8", @"C:\Excellogo.gif",120,80);
ipt.SaveFile(@"C:\ExcelTest.xls");
ipt.Dispose();

简单包装的类:

<!--StartFragment-->using System;
using System.Windows.Forms;
using Excel = Microsoft.Office.Interop.Excel;

namespace MengXianhui.Utility.ExcelReport
{
  class InsertPictureToExcel
  {
    /// <summary>
    /// 打开没有模板的操作。
    /// </summary>
    public void Open( )
    {
      this.Open(String.Empty);
    }

    /// <summary>
    /// 功能:实现Excel应用程序的打开
    /// </summary>
    /// <param name="TemplateFilePath">模板文件物理路径</param>
    public void Open( string TemplateFilePath )
    {
      //打开对象
      m_objExcel = new Excel.Application();
      m_objExcel.Visible = false;
      m_objExcel.DisplayAlerts = false;

      if (m_objExcel.Version != "11.0")
      {
        MessageBox.Show("您的 Excel 版本不是 11.0 (Office 2003),操作可能会出现问题。");
        m_objExcel.Quit();
        return;
      }

      m_objBooks = (Excel.Workbooks)m_objExcel.Workbooks;
      if (TemplateFilePath.Equals(String.Empty))
      {
        m_objBook = (Excel._Workbook)(m_objBooks.Add(m_objOpt));
      }
      else
      {
        m_objBook = m_objBooks.Open(TemplateFilePath, m_objOpt, m_objOpt, m_objOpt, m_objOpt,
          m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt);
      }
      m_objSheets = (Excel.Sheets)m_objBook.Worksheets;
      m_objSheet = (Excel._Worksheet)(m_objSheets.get_Item(1));
      m_objExcel.WorkbookBeforeClose += new Excel.AppEvents_WorkbookBeforeCloseEventHandler(m_objExcel_WorkbookBeforeClose);
    }

    private void m_objExcel_WorkbookBeforeClose( Excel.Workbook m_objBooks, ref bool _Cancel )
    {
      MessageBox.Show("保存完毕!");
    }

    /// <summary>
    /// 将图片插入到指定的单元格位置。
    /// 注意:图片必须是绝对物理路径
    /// </summary>
    /// <param name="RangeName">单元格名称,例如:B4</param>
    /// <param name="PicturePath">要插入图片的绝对路径。</param>
    public void InsertPicture( string RangeName, string PicturePath )
    {
      m_objRange = m_objSheet.get_Range(RangeName, m_objOpt);
      m_objRange.Select();
      Excel.Pictures pics = (Excel.Pictures)m_objSheet.Pictures(m_objOpt);
      pics.Insert(PicturePath, m_objOpt);
    }

    /// <summary>
    /// 将图片插入到指定的单元格位置,并设置图片的宽度和高度。
    /// 注意:图片必须是绝对物理路径
    /// </summary>
    /// <param name="RangeName">单元格名称,例如:B4</param>
    /// <param name="PicturePath">要插入图片的绝对路径。</param>
    /// <param name="PictuteWidth">插入后,图片在Excel中显示的宽度。</param>
    /// <param name="PictureHeight">插入后,图片在Excel中显示的高度。</param>
    public void InsertPicture( string RangeName, string PicturePath, float PictuteWidth, float PictureHeight )
    {
      m_objRange = m_objSheet.get_Range(RangeName, m_objOpt);
      m_objRange.Select();
      float PicLeft, PicTop;
      PicLeft = Convert.ToSingle(m_objRange.Left);
      PicTop = Convert.ToSingle(m_objRange.Top);
      //参数含义:
      //图片路径
      //是否链接到文件
      //图片插入时是否随文档一起保存
      //图片在文档中的坐标位置(单位:points)
      //图片显示的宽度和高度(单位:points)
      //参数详细信息参见:http://msdn2.microsoft.com/zh-cn/library/aa221765(office.11).aspx
      m_objSheet.Shapes.AddPicture(PicturePath, Microsoft.Office.Core.MsoTriState.msoFalse,
        Microsoft.Office.Core.MsoTriState.msoTrue, PicLeft, PicTop, PictuteWidth, PictureHeight);
    }

    /// <summary>
    /// 将Excel文件保存到指定的目录,目录必须事先存在,文件名称不一定要存在。
    /// </summary>
    /// <param name="OutputFilePath">要保存成的文件的全路径。</param>
    public void SaveFile( string OutputFilePath )
    {
      m_objBook.SaveAs(OutputFilePath, m_objOpt, m_objOpt,
        m_objOpt, m_objOpt, m_objOpt, Excel.XlSaveAsAccessMode.xlNoChange,
        m_objOpt, m_objOpt, m_objOpt, m_objOpt, m_objOpt);

      this.Close();
    }
    /// <summary>
    /// 关闭应用程序
    /// </summary>
    private void Close( )
    {
      m_objBook.Close(false, m_objOpt, m_objOpt);
      m_objExcel.Quit();
    }

    /// <summary>
    /// 释放所引用的COM对象。注意:这个过程一定要执行。
    /// </summary>
    public void Dispose( )
    {
      ReleaseObj(m_objSheets);
      ReleaseObj(m_objBook);
      ReleaseObj(m_objBooks);
      ReleaseObj(m_objExcel);
      System.GC.Collect();
      System.GC.WaitForPendingFinalizers();
    }
    /// <summary>
    /// 释放对象,内部调用
    /// </summary>
    /// <param name="o"></param>
    private void ReleaseObj( object o )
    {
      try
      {
        System.Runtime.InteropServices.Marshal.ReleaseComObject(o);
      }
      catch { }
      finally { o = null; }
    }

    private Excel.Application m_objExcel = null;
    private Excel.Workbooks m_objBooks = null;
    private Excel._Workbook m_objBook = null;
    private Excel.Sheets m_objSheets = null;
    private Excel._Worksheet m_objSheet = null;
    private Excel.Range m_objRange = null;
    private object m_objOpt = System.Reflection.Missing.Value;
  }


 

 

只有注册用户登录后才能发表评论。