C# 怎么操作Excel啊？

[zenkishi]

网上东东太乱了。各位大虾能提供基础一点的东西吗？

[葫芦鬼]

自己在Excel里录个宏来看看就明白了

[zenkishi]

怎么这么敷衍！

[lishaowensdut]

.net里面有例子

[葫芦鬼]

现成的代码我也有 不是不想给你

在看过MSDN后 我说的方法对你是最有帮助的

[葫芦鬼]

using Excel = Microsoft.Office.Interop.Excel;
using OleColor = System.Drawing.ColorTranslator;

{
private Excel.Application m_excelApp = null;
public InitExcel()
{
Excel.Workbook book = m_excelApp.Workbooks.Add(Excel.XlWBATemplate.xlWBATWorksheet);
Excel.Worksheet firstSheet = (Excel.Worksheet)book.ActiveSheet;
firstSheet.Name = "FirstSheet";
Excel.Range range = firstSheet.get_Range("A1", "F5");
for(int i = 1; i < 5; ++i)
{
for(int j = 1; j < 5; ++j)
{
if(i != j)
continue;

Excel.Range subRange = range.Cells[i, j] as Excel.Range;
subRange.Value2 = i.ToString();
subRange.Font.Color = OleColor.ToOle(Color.Blue);
subRange.Interior.Color = OleColor.ToOle(Color.Brown);
}
}

Excel.Worksheet secondSheet = (Excel.Worksheet)book.Worksheets.Add(m_Miss, book.Worksheets[book.Worksheets.Count], m_Miss, m_Miss);
firstSheet.Name = "SecondSheet";
range = secondSheet.get_Range("A1", "F5");
for(int i = 1; i < 5; ++i)
{
for(int j = 1; j < 5; ++j)
{
if(i != j)
continue;

Excel.Range subRange = range.Cells[i, j] as Excel.Range;
subRange.Value2 = i.ToString();
subRange.Font.Color = OleColor.ToOle(Color.Black);
subRange.Interior.Color = OleColor.ToOle(Color.Red);
}
}

Excel.Worksheet thirdSheet = (Excel.Worksheet)book.Worksheets.Add(m_Miss, book.Worksheets[book.Worksheets.Count], m_Miss, m_Miss);
thirdSheet.Name = "ThirdSheet";
firstSheet.UsedRange.Copy(thirdSheet.get_Range("A1","A1"));
secondSheet.UsedRange.Copy(thirdSheet.get_Range("A6","A6"));

range = thirdSheet.get_Range("A10","D10");
range.Value2 = m_excelApp.Path;
range.Cells.MergeCells = true;

range = thirdSheet.get_Range("C13","D13");
range.Cells.Value2 = "C12, D12";
range.Cells.Font.Color = OleColor.ToOle(Color.Black);
range.Interior.Color = OleColor.ToOle(Color.White);

range = range.get_Offset(2,2);
range.Cells.Value2 = "B15, C15";
range.Cells.Font.Color = OleColor.ToOle(Color.Black);
range.Interior.Color = OleColor.ToOle(Color.Turquoise);

range = thirdSheet.get_Range("C13","D13");
range.get_Offset(-2, -2);
range.Cells.Value2 = "C11, D11";
range.Cells.Font.Color = OleColor.ToOle(Color.Black);
range.Interior.Color = OleColor.ToOle(Color.Turquoise);

firstSheet.Activate();
m_excelApp.Visible = true;
}
}