昨夜飘风
昨 夜, 风, 飘 过; 枯 树, 叶, 飞 落。

类文件代码:

 

using System;
using Microsoft.Office.Interop.Excel;
using Microsoft.Office.Core;

/// <summary>
///ExeclInsertPicture 的摘要说明
/// </summary>

public class ExeclInsertPicture
{
    
private Microsoft.Office.Interop.Excel.Application m_objExcel = null;
    
private Microsoft.Office.Interop.Excel.Workbooks m_objBooks = null;
    
private Microsoft.Office.Interop.Excel._Workbook m_objBook = null;
    
private Microsoft.Office.Interop.Excel.Sheets m_objSheets = null;
    
private Microsoft.Office.Interop.Excel._Worksheet m_objSheet = null;
    
private Microsoft.Office.Interop.Excel.Range m_objRange = null;
    
private object m_objOpt = System.Reflection.Missing.Value;

    
public ExeclInsertPicture()
    
{
        
//
        
//TODO: 在此处添加构造函数逻辑
        
//
    }


    
public void Open()
    
{
        
this.Open(string.Empty);
    }


    
/// <summary>
    
/// 功能:实现Excel应用程序的打开
    
/// </summary>
    
/// <param name="TemplateFilePath">模板文件物理路径</param>

    public void Open(string TemplateFilePath)
    
{
        
//打开对象
        m_objExcel = new Microsoft.Office.Interop.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 
= (Microsoft.Office.Interop.Excel.Workbooks)m_objExcel.Workbooks;
        
if (TemplateFilePath.Equals(String.Empty))
        
{
            m_objBook 
= (Microsoft.Office.Interop.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 
= (Microsoft.Office.Interop.Excel.Sheets)m_objBook.Worksheets;
        m_objSheet 
= (Microsoft.Office.Interop.Excel._Worksheet)(m_objSheets.get_Item(1));
        m_objExcel.WorkbookBeforeClose 
+= new Microsoft.Office.Interop.Excel.AppEvents_WorkbookBeforeCloseEventHandler(m_objExcel_WorkbookBeforeClose);
    }


    
private void m_objExcel_WorkbookBeforeClose(Microsoft.Office.Interop.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();
        Microsoft.Office.Interop.Excel.Pictures pics 
= (Microsoft.Office.Interop.Excel.Pictures)m_objSheet.Pictures(m_objOpt);
        pics.Insert(PicturePath, m_objOpt);
    }


    
/// <summary>
    
/// 将图片插入到指定的单元格位置,并设置图片的宽度和高度。
    
/// 注意:图片必须是绝对物理路径
    
/// </summary>
    
/// <param name="RangeName">单元格名称,例如:B4</param> 网管论坛bbs_bitsCN_com 
    
/// <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);
        
//参数含义:
        
//图片路径
        
//是否链接到文件
        
//图片插入时是否随文档一起保存 中国网管联盟bitsCN.com 
        
//图片在文档中的坐标位置(单位: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, Microsoft.Office.Interop.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; }
    }

}

 

调用演示:

 

        ExeclInsertPicture ipt = new ExeclInsertPicture();

        ipt.Open();

        ipt.InsertPicture(
"B2"@"C:\d52559282.jpg");//“B2”表示图片对起B2单元格,但是图片大小不能自适应单元格的大小,需要用下面语句调整图片大小

        ipt.InsertPicture(
"B8"@"C:\d52559282.jpg"12080);

        ipt.SaveFile(
@"C:\ExcelTest.xls");

        ipt.Dispose();
//此句必须,否则EXECL.dll不会立即释放
posted on 2008-10-20 15:18  昨夜飘风  阅读(1027)  评论(0编辑  收藏  举报