我没有写过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
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
三.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套件中的成员也具有十分的借鉴意义。
{
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;
}
}