怎么对EXCEL文件进行读取和写入?(等)
如何对EXCEL文件进行读取和写入??(等)
环境:VS2005.对文件操作比较陌生。麻烦各位知道的能详细的写下你们的CODE,小女感激不尽!!
假设一文件1.XLS,有两列数据A,B; 另一文件2.XLS,也有两列数据A,B。现2.XLS中列B是空的。根据1.XLS中的列A,B对应关系,找到A对应的B,写了到2.XLS的对应B中的。
说的应该很明白了吧。谢谢!
------解决方案--------------------
引用Excel
Dim app As New Excel.Application ()
Dim book As Excel.Workbook = app.Workbooks.Open(path)
Dim sheet as Excel.WorkSheet = book.sheets(1)
sheet.Range(EQUIPMENT_AREA_CELL).Value = "test "
book.Save()
就这么简单
------解决方案--------------------
你说你是女的有什么意义??
------解决方案--------------------
C#中创建、打开、读取、写入、保存Excel的一般性代码
首先,在引用的COM中找到Microsoft Excel 11.0 Object Library,添加。
using System;
using System.Reflection; // 引用这个才能使用Missing字段
using Excel;
namespace CExcel1
{
class Class1
{
[STAThread]
static void Main(string[] args)
{
//创建Application对象
Excel.Application xApp=new Excel.ApplicationClass();
xApp.Visible=true;
//得到WorkBook对象, 可以用两种方式之一: 下面的是打开已有的文件
Excel.Workbook xBook=xApp.Workbooks._Open(@ "D:\Sample.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value
,Missing.Value,Missing.Value,Missing.Value,Missing.Value
,Missing.Value,Missing.Value,Missing.Value,Missing.Value);
//xBook=xApp.Workbooks.Add(Missing.Value);//新建文件的代码
//指定要操作的Sheet,两种方式:
Excel.Worksheet xSheet=(Excel.Worksheet)xBook.Sheets[1];
//Excel.Worksheet xSheet=(Excel.Worksheet)xApp.ActiveSheet;
//读取数据,通过Range对象
Excel.Range rng1=xSheet.get_Range( "A1 ",Type.Missing);
Console.WriteLine(rng1.Value2);
//读取,通过Range对象,但使用不同的接口得到Range
Excel.Range rng2=(Excel.Range)xSheet.Cells[3,1];
Console.WriteLine(rng2.Value2);
//写入数据
Excel.Range rng3=xSheet.get_Range( "C6 ",Missing.Value);
rng3.Value2= "Hello ";
rng3.Interior.ColorIndex=6; //设置Range的背景色
//保存方式一:保存WorkBook
xBook.SaveAs(@ "D:\CData.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value,Missing.Value,
Excel.XlSaveAsAccessMode.xlNoChange,Missing.Value,Missing.Value,Missing.Value,
Missing.Value,Missing.Value);
//保存方式二:保存WorkSheet
xSheet.SaveAs(@ "D:\CData2.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value,
Missing.Value,Missing.Value,Missing.Value,Missing.Value,Missing.Value);
//保存方式三
xBook.Save();
xSheet=null;
xBook=null;
xApp.Quit(); //这一句是非常重要的,否则Excel对象不能从内存中退出
xApp=null;
}
}
}
------解决方案--------------------
需要在参照设定里添加 ms excel
------解决方案--------------------
dim rng1 as Excel.Range=xSheet.get_Range( "A1 ",Type.Missing);
环境:VS2005.对文件操作比较陌生。麻烦各位知道的能详细的写下你们的CODE,小女感激不尽!!
假设一文件1.XLS,有两列数据A,B; 另一文件2.XLS,也有两列数据A,B。现2.XLS中列B是空的。根据1.XLS中的列A,B对应关系,找到A对应的B,写了到2.XLS的对应B中的。
说的应该很明白了吧。谢谢!
------解决方案--------------------
引用Excel
Dim app As New Excel.Application ()
Dim book As Excel.Workbook = app.Workbooks.Open(path)
Dim sheet as Excel.WorkSheet = book.sheets(1)
sheet.Range(EQUIPMENT_AREA_CELL).Value = "test "
book.Save()
就这么简单
------解决方案--------------------
你说你是女的有什么意义??
------解决方案--------------------
C#中创建、打开、读取、写入、保存Excel的一般性代码
首先,在引用的COM中找到Microsoft Excel 11.0 Object Library,添加。
using System;
using System.Reflection; // 引用这个才能使用Missing字段
using Excel;
namespace CExcel1
{
class Class1
{
[STAThread]
static void Main(string[] args)
{
//创建Application对象
Excel.Application xApp=new Excel.ApplicationClass();
xApp.Visible=true;
//得到WorkBook对象, 可以用两种方式之一: 下面的是打开已有的文件
Excel.Workbook xBook=xApp.Workbooks._Open(@ "D:\Sample.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value
,Missing.Value,Missing.Value,Missing.Value,Missing.Value
,Missing.Value,Missing.Value,Missing.Value,Missing.Value);
//xBook=xApp.Workbooks.Add(Missing.Value);//新建文件的代码
//指定要操作的Sheet,两种方式:
Excel.Worksheet xSheet=(Excel.Worksheet)xBook.Sheets[1];
//Excel.Worksheet xSheet=(Excel.Worksheet)xApp.ActiveSheet;
//读取数据,通过Range对象
Excel.Range rng1=xSheet.get_Range( "A1 ",Type.Missing);
Console.WriteLine(rng1.Value2);
//读取,通过Range对象,但使用不同的接口得到Range
Excel.Range rng2=(Excel.Range)xSheet.Cells[3,1];
Console.WriteLine(rng2.Value2);
//写入数据
Excel.Range rng3=xSheet.get_Range( "C6 ",Missing.Value);
rng3.Value2= "Hello ";
rng3.Interior.ColorIndex=6; //设置Range的背景色
//保存方式一:保存WorkBook
xBook.SaveAs(@ "D:\CData.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value,Missing.Value,
Excel.XlSaveAsAccessMode.xlNoChange,Missing.Value,Missing.Value,Missing.Value,
Missing.Value,Missing.Value);
//保存方式二:保存WorkSheet
xSheet.SaveAs(@ "D:\CData2.xls ",
Missing.Value,Missing.Value,Missing.Value,Missing.Value,
Missing.Value,Missing.Value,Missing.Value,Missing.Value,Missing.Value);
//保存方式三
xBook.Save();
xSheet=null;
xBook=null;
xApp.Quit(); //这一句是非常重要的,否则Excel对象不能从内存中退出
xApp=null;
}
}
}
------解决方案--------------------
需要在参照设定里添加 ms excel
------解决方案--------------------
dim rng1 as Excel.Range=xSheet.get_Range( "A1 ",Type.Missing);