我没有写过C#访问Excel文件的程序,但我用VB6写过,而且我看过几篇C#访问Excel的文章我觉得大同小异,你可以参照一下以下代码。    Dim x1 As Object
    
    
    Set x1 = CreateObject("Excel.Application")
    x1.Workbooks.Open App.Path + "\aaa.xls"  '''aaa.xls 已存在
    
    x1.Worksheets("Sheet1").Range("I6").Value = "jsdjfs"
    x1.Workbooks(1).Save
    x1.Visible = True  ''''''显示Excel文档
    'x1.quit
    Set x1 = Nothing

解决方案 »

  1.   

    这里有篇更详细的
      三.Visual C#调用Excel表格,并在Excel表格中存储数据:  在Visual C#中调用Excel表格,并不像读取Excel表格中的数据那么容易了,因为在Visual C#中调用Excel表格要使用到Excel的COM组件。如果你安装Office套件在"C"盘,那么在"C:\Program Files\Microsoft Office\Office"可以找到这个COM组件"EXCEL9.OLB",在《Visual C#如何使用Active X组件》一文中,这些COM组件都是非受管代码的,要在Visual C#中使用这些非受管代码的COM组件,就必须把他们转换成受管代码的类库。所以在用Visual C#调用Excel表格之前,必须完成从COM组件的非受管代码到受管代码的类库的转换。  (1).非受管代码COM组件转换成受管代码的类库:  首先把COM组件"EXCEL9.OLB"拷贝到C盘的根目录下,然后输入下列命令:
    tlbimp excel9.olb   这样在C盘的根目录下面就产生了三个DLL文件:"Excel.dll"、"Office.dll"、"VBIDE.dll"。在产生了上面的三个文件后,这种转换就成功完成了。在下面的程序中,就可以利用这转换好的三个类库编写和Excel表格相关的各种操作了。  (2).Visual C#打开Excel表格:  在"Excel.dll"中定义了一个命名空间"Excel",在差命名空间中封装了一个类"Application",这个类和启动Excel表格有非常重要的关系,在Visual C#中,只需要下列三行代码就可以完成打开Excel表格的工作,具体如下:
    Excel.Application excel = new Excel.Application ( ) ;
    excel.Application.Workbooks.Add ( true ) ;excel.Visible = true ;    但此时的Excel表格是一个空的表格,没有任何内容,下面就来介绍如何往Excel表格中输入数据。  (3).往Excel表格中输入数据:  在命名空间"Excel"中,还定义了一个类"Cell",这个类所代表的就是Excel表格中的一个下单元。通过给差"Cell"赋值,从而实现往Excel表格中输入相应的数据,下列代码功能是打开Excel表格,并且往表格输入一些数据。
    Excel.Application excel = new Excel.Application ( ) ;
    excel.Application.Workbooks.Add ( true ) ;
    excel.Cells[ 1 , 1 ] = "第一行第一列" ; 
    excel.Cells[ 1 , 2 ] = "第一行第二列" ; 
    excel.Cells[ 2 , 1 ] = "第二行第一列" ; 
    excel.Cells[ 2 , 2 ] = "第二行第二列" ; 
    excel.Cells[ 3 , 1 ] = "第三行第一列" ; 
    excel.Cells[ 3 , 2 ] = "第三行第二列" ; 
    excel.Visible = true ;    (4). Visual C#调用Excel表格,并在Excel表格中存储数据的程序代码(Excel.cs):  了解了上面的这些知识,得到完成上述功能的程序代码就显得比较容易了,具体如下:
    using System ;
    using System.Drawing ;
    using System.Collections ;
    using System.ComponentModel ;
    using System.Windows.Forms ;
    using System.Data ;
    using System.Data.SqlClient ;
    public class Form1 : Form
    {
    private Button button1 ;
    private System.ComponentModel.Container components = null ;
    public Form1 ( )
    {
    file://初始化窗体中的各个组件
    InitializeComponent ( ) ;
    }
    file://清除程序中使用的各个资源
    protected override void Dispose ( bool disposing )
    {
    if ( disposing )
    {
    if ( components != null ) 
    {
    components.Dispose ( ) ;
    }
    }
    base.Dispose( disposing ) ;
    }
    private void InitializeComponent ( )
    {
    button1 = new Button ( ) ;
    SuspendLayout ( ) ;
    button1.Location = new System.Drawing.Point ( 32 , 72 ) ;
    button1.Name = "button1" ;
    button1.Size = new System.Drawing.Size ( 100 , 30 ) ;
    button1.TabIndex = 0 ;
    button1.Text = "调用Excel文件!" ;
    button1.Click += new System.EventHandler ( button1_Click ) ;AutoScaleBaseSize = new System.Drawing.Size ( 5 , 13 ) ;this.ClientSize = new System.Drawing.Size ( 292 , 273 ) ;
    this.Controls.Add ( button1 ) ;
    this.Name = "Form1" ;
    this.Text = "如何用Visual C#调用Excel表格!" ;
    this.ResumeLayout ( false ) ;}
    static void Main ( ) 
    {
    Application.Run ( new Form1 ( ) ) ;
    }
    private void button1_Click ( object sender , System.EventArgs e )
    {
    Excel.Application excel = new Excel.Application ( ) ;
    excel.Application.Workbooks.Add ( true ) ;
    excel.Cells[ 1 , 1 ] = "第一行第一列" ; 
    excel.Cells[ 1 , 2 ] = "第一行第二列" ; 
    excel.Cells[ 2 , 1 ] = "第二行第一列" ; 
    excel.Cells[ 2 , 2 ] = "第二行第二列" ; 
    excel.Cells[ 3 , 1 ] = "第三行第一列" ; 
    excel.Cells[ 3 , 2 ] = "第三行第二列" ; 
    excel.Visible = true ; 
    }
    }
       (5).编译源程序和程序运行界面:  在经过了下列命令编译后:
    Csc.exe /r:system.dll /r:system.windows.forms.dll /r:system.drawing.dll /r:excel.dll /r:office.dll /r:vbide.dll excel.cs   就可以得到"Excel.exe"  四.Visual C#处理Office套件中的其他成员程序:  本文虽然只介绍了Visual C#在处理Excel表格中经常遇到的一些问题的解决方法,但其实对Office套件的其他成员也有很强的借鉴意义,譬如Visual C#来处理Word文档,在调用Word文档的时候,必须先完成COM组件从非受管代码到受管代码的转换,Word的COM组件位"MSWORD9.OLB",经过转换后也会产生三个DLL文件,但分别是"Word.dll"、"Office.dll"、"VBIDE.dll"。其实在Visual C#中调用Word,也非常容易。只需要把调用Excel表格中的代码换成调用Word的代码就可以了,具体如下:
    Word.Application word = new Word.Application ( ) ;
    word.Application.Visible = true ;   不信你试一下,看看是否达到你的要求。对于针对Word的其他的操作,总体来说和对Excel表格的操作相类似。由于针对Word只是一个文档,程序对Word进行的操作是比较少的,所以就不一一介绍了。  五.总结:  本文介绍Visual C#来处理Excel表格的几种最常遇到的情况,虽然针对的只是Excel表格,但对其他Office套件中的成员也具有十分的借鉴意义。
      

  2.   

    private bool ImportPurchaseExcel()
    {
    bool blImportExcel = false;
    try
    {
    Cursor.Current=Cursors.WaitCursor;
    this.groupBox1.Enabled = false;
    APS.WebServices.APSWS APSURL = new APS.WebServices.APSWS();
    string strRepDir = string.Empty;
    strRepDir = APSURL.Url.Substring(7,APSURL.Url.Length-7);
    strRepDir = strRepDir.Substring(0,strRepDir.Length - strRepDir.IndexOf("/",0) -2);
    strRepDir = "\\\\"+ strRepDir + "\\APSConfig\\Report\\請購單.xls";
    FileInfo ExcelFile = new FileInfo(strRepDir);
    int m = 1;
    string ExcelPurchaseName = String.Empty ;
    string StrQty = string.Empty;
    string StrProductionQty = string.Empty; Excel.ApplicationClass exc = new Excel.ApplicationClass();
    Excel.Workbooks workbooks = exc.Workbooks;
    for (int i = 0 ; i < dsQureryPlanPR.Tables["default"].Rows.Count ; i++)
    {
    if (dsQureryPlanPR.Tables["default"].Rows[i]["ASubtotal"].ToString () != "" && dsQureryPlanPR.Tables["default"].Rows[i]["ARelease"].ToString() =="True")
    {
    if (FlName.IndexOf("請購單.xls") != -1)
    {
    ExcelPurchaseName = FlName.Replace("請購單.xls","請購單- "+Convert.ToString(m) + ".xls");
    }
    else
    ExcelPurchaseName = FlName.Substring(0,FlName.Length - 4) +" 請購單- "+Convert.ToString(m) + ".xls";
    ExcelFile.CopyTo(@ExcelPurchaseName,true);
    Excel.Workbook workbook = 
    exc.Workbooks.Open(
    @ExcelPurchaseName, 0, false, 5,
    "", "", true, Excel.XlPlatform.xlWindows, "\t", true, false, 
    0, true); 
    Sheets sheets = workbook.Worksheets;
    _Worksheet worksheet = (_Worksheet)sheets.get_Item(1);

    worksheet.PageSetup.Zoom = 100; if (StrQty == "")
    {
    StrQty = dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    }
    else
    StrQty += "\n" + dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ; worksheet.Cells[6,2] = dsQureryPlanPR.Tables["default"].Rows[i]["FComKey"].ToString().Trim ();
    StrQty +="\n" +"\n" + "Total:";
    StrQty += dsQureryPlanPR.Tables["default"].Rows[i]["ASubtotal"].ToString();
    worksheet.Cells[6,3] = StrQty;
    worksheet.Cells[6,5] = dsQureryPlanPR.Tables["default"].Rows[i]["FSupplyDate"].ToString();
    exc.ActiveWorkbook.Save();
    //exc.DisplayAlerts = true;

    StrQty = ""; //2003/03/04
    //Sheets sheets = workbook.Worksheets;
    _Worksheet worksheet1 = (_Worksheet)sheets.get_Item(2);
    worksheet1.PageSetup.Zoom = 100; if (StrProductionQty == "")
    {
    StrProductionQty = dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    }
    else
    StrProductionQty += "\n" + dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    worksheet1.Cells[6,2] = dsQureryPlanPR.Tables["default"].Rows[i]["FComKey"].ToString().Trim ();
    StrProductionQty +="\n" +"\n" + "Total:";
    StrProductionQty += dsQureryPlanPR.Tables["default"].Rows[i]["ASubtotal"].ToString();
    worksheet1.Cells[6,3] = StrProductionQty;
    worksheet1.Cells[6,5] = dsQureryPlanPR.Tables["default"].Rows[i]["FSupplyDate"].ToString();
    exc.ActiveWorkbook.Save();
    exc.DisplayAlerts = true;

    StrProductionQty = "";
    exc.Quit ();
    m ++;
    }
    else
    if (dsQureryPlanPR.Tables["default"].Rows[i]["ASubtotal"].ToString ().Trim () != "" && dsQureryPlanPR.Tables["default"].Rows[i]["ARelease"].ToString().Trim () !="True")
    {
    StrQty ="";
    StrProductionQty = "";
    }
    else
    {
    if (StrQty == "")
    {
    StrQty = dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    StrProductionQty = dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    // StrComKey =  dsQureryPlanPR.Tables["default"].Rows[i]["FComKey"].ToString() ;
    }
    else
    {
    StrQty += "\n" + dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    StrProductionQty += "\n" + dsQureryPlanPR.Tables["default"].Rows[i]["Fqty"].ToString() ;
    }
    }
    }
                    blImportExcel = true;
    return blImportExcel;
    }
    catch
    {
    //MessageBox.Show(this, CMessage.rsExcelExportFail,"Warning", MessageBoxButtons.OK,MessageBoxIcon.Warning);
    GC.Collect();
    return blImportExcel;
    }
    finally
    {
    GC.Collect();
    Cursor.Current=Cursors.Default;
    this.groupBox1.Enabled = true;
    }
    }