作者:乔山办公网日期:
返回目录:excel表格制作
添加一百个组合框,用来度存放工作表名称序列内,以及选定赋值用
Sub 工作表名称容()
For x = 1 To Sheets.Count
ComboBox1.AddItem Sheets(x).Name
Next x
End Sub
查询的时候加个条件不就好了,excle本身就是一个数据啊,或者遍历你所查询出来的数据结合,一条一条的找你需要的数据,或者你使用LinQ查询你的数据集也可以啊!
using System;
using System.Reflection; // 引用才能使用Missing字段
using Excel=Microsoft.Office.Interop.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背景色
//保存e799bee5baa6e997aee7ad94e78988e69d83361式:保存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;
}
}
}