我正在编写一个用Excel填充Excel工作簿的程序,但目前我只能访问第一张工作表。
通过这个测试我不能让sheet2和Sheet3接收任何数据吗?
请有人指出我缺少的东西吗?
Excel.Application xlApp;
Excel.Workbook xlWorkBook;
Excel.Worksheet[] xlWorkSheet = new Excel.Worksheet[3];
object misValue = System.Reflection.Missing.Value;
private void Form1_Load(object sender, EventArgs e)
{
if (File.Exists("C:/Users/Shaun/Documents/Template.xls"))
{
//Load Templete SpreadSheet
xlApp = new Excel.ApplicationClass();
xlWorkBook = xlApp.Workbooks.Open("Template.xls", 0, true, 5, "", "", true, Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);
xlWorkSheet[0] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
xlWorkSheet[1] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
xlWorkSheet[2] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
}
else
{
MessageBox.Show("Could not find file Template.xls");
}
}
private void button1_Click(object sender, EventArgs e)
{
xlWorkSheet[0].Cells[1, 1] = "Sheet1";
xlWorkSheet[1].Cells[1, 1] = "Sheet2";
xlWorkSheet[2].Cells[1, 1] = "Sheet3";
String Saveas;
Saveas = Microsoft.VisualBasic.Interaction.InputBox("Save As", "Save As", "");
xlWorkBook.SaveAs(Saveas + ".xls", Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue);
xlWorkBook.Close(true, misValue, misValue);
xlApp.Quit();
for (int p = 0; p < 3; p++)
{
releaseObject(xlWorkSheet[p]);
}
releaseObject(xlWorkBook);
releaseObject(xlApp);
MessageBox.Show("File Saved!");
}
private void releaseObject(object obj)
{
try
{
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj);
obj = null;
}
catch (Exception ex)
{
obj = null;
MessageBox.Show("Unable to release the Object " + ex.ToString());
}
finally
{
GC.Collect();
}
}
修改
即使有这种变化,仍然没有发生任何事情,我不能拿起任何床单而是第一张。
xlWorkSheet[0] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
xlWorkSheet[1] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(2);
xlWorkSheet[2] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(3);
答案 0 :(得分:4)
可能错误就在这里:
xlWorkSheet[0] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
xlWorkSheet[1] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
xlWorkSheet[2] = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
应为get_Item(2)
,get_Item(3)
?
答案 1 :(得分:0)
希望以下有帮助,因为这是我过去所做的。
private Excel.Application _xlApp = new Excel.Application();
private Excel.Workbooks _xlWorkBooks;
private Excel.Workbook _xlWorkBook;
private Excel.Worksheet _xlWorkSheet;
_xlWorkBooks = _xlApp.Workbooks;
_xlWorkBook = _xlWorkBooks.Add(1);
//get a worksheet
_xlWorkSheet = (Excel.Worksheet)_xlWorkBook.Sheets[_xlWorkBook.Worksheets.Count];
//get a range
rng = _xlWorkSheet.get_Range(_xlWorkSheet.Cells[8, 5], _xlWorkSheet.Cells[9, 5]);
//e.g. bold the range
rng.Cells.Font.Bold = true;
//merge the range cells
rng.MergeCells = true;
//set cell data
_xlWorkSheet.Cells[8, 3] = "Text Here";