网上东东太乱了。各位大虾能提供基础一点的东西吗?
解决方案 »
- 现在开发一个winform的程序,遇到瓶颈了, 支援啊
- 关于web刷新时textbox的问题~求9。。
- 菜鸟提问,希望高手解答一个关于c#运行机制的问题
- 求救!!!一个窗体处理问题
- vs2010C#连接sql2005
- 为什么DropDownList1.SelectedItem总是指向第一个项?
- c#以带tab的txt文件做数据源的问题
- 怎么把OuTlook InBox里的附件保存到本地磁盘?
- 我该怎么办啊?为什么没人理我?我给您磕头了!!!!!!!
- 删除记录时提交数据集出错,说是“更新要求有效的 DeleteCommand。”
- 一个引用出现的错误。。
- 请问 HTMLDocumentClass的execCommand执行的方法列表
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;
}
}