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

解决方案 »

  1.   

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

  2.   

    现成的代码我也有 不是不想给你在看过MSDN后 我说的方法对你是最有帮助的
      

  3.   

    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;
    }
    }