C#如何定制Excel界面并实现与数据库交互(上)

lsekfe

Excel是微软办公套装软件的一个重要的组成部分，它可以进行各种数据的处理、统计分析和辅助决策操作，广泛地应用于管理、统计财经、金融等众多领域。(另外，Excel还是伦敦一所会展中心的名称)。.NET可以创建Excel Add-In对Excel进行功能扩展，这些扩展的功能包括自定义用户函数，自定义UI，与数据库进行数据交互等。
　　一 主要的Excel开发方式
　　1 VBA
　　VBA是一种Visual Basic的宏语言，它是最早的Office提供定制化的一种解决方案，VBA是VB的一个子集，和Visual Basic不同，VBA是一种宿主型语言，无论是专业的开发人员，还是刚入门的非开发人员，都可以利用VBA完成简单或复杂的需求。
　　2 Excel Addin
　　Excel Addin，就像Visual Studio外接插件一样，也可以使用一些技术为Office开发一些插件。对VBA的一些问题，一些专业的开发人员，可以使用 VisualBasic或者VisualC++等工具来引用Office的一些dll，来针对Office进行开发。开发的时候将dll注册为com组 件，并在注册表里面进行注册，这样就可以在Excel里直接调用这些插件。
　　3 VSTO (Visual Studio Tools for Office)
　　VSTO主要是对Office的一些dll进行了.NET封装，使得我们可以使用.NET上的语言来方便的对Office的一些方法进行调用。所 以，Office开发跨入了一个新的时代，开发人员可以使用更加高级的语言和熟悉的技术来更容易的进行Office开发。 对于企业及的应用和开发，VSTO或许是首要选择，他极大地扩展了Office应用程序的能力，使用.NET平台支持的编程语言，能够直接访问.NET上面众多的类库。具有较好的安全机制。简化了Office插件的开发和部署。
　　4 XLL
　　XLL是Excel的一种外接应用程序，他使用C和C++开发，程序通过调用Excel暴漏的C接口来实现扩展功能。这种方式开发的应用程序效率高，但是难度大，对开发者自身的要求较高。开源项目Excel-DNA就是使用XLL技术开发的，能够帮助.NET 开发人员来极大地简化RTD函数，同步、异步UDF函数的编写和开发。
　　5 OpenXML
　　如果用户没有安装Excel应用程序，或者在服务器端需要动态生成Excel文件的时候。我们可能需要直接读取或者生成Excel文件，这种情况下，如果要对Excel文件进行各种定制化开发的话，建议使用OpenXML。NPOI开源项目可以直接读写Excel文件，而且兼容多个版本。
　　二 使用Excel Add-In构建扩展
　　开发环境: 操作系统为Windows Server 2008R2 x64;Excel为Excel 2010 x64;开发工具为Visual Studio 2012旗舰版x64;数据库为SQL Server 2008R2 x64.
　　1 程序结构
　　用Visual Studio 2012新建一个ExcelAddInDemo的Excel Add-In项目，并添加若干文件，程序结构如下图:

　　其中，RibbonAddIn可以定制2010的UI面板，SqlHelper.cs是一个简单的数据库访问帮助类，UClog.cs，UCPaneLeft.cs，UCTaskGrid.cs，UCTaskPane.cs都为添加的自定义控件，并通过程序添加到EXCEL界面中.运行起来的界面如下:

　　程序可以通过在Excel界面中输入ID，First，Last，Email的值(对应标签的后一个单元格)，单击用户列表面板上的保存按钮，将数据保存到数据库中.
　　2 RibbonAddIn设计
　　我们通过RibbonAddIn.cs给Excel的Ribbon添加了一个名为CUMT的插件.RibbonAddIn面板可以通过工具条控件方便的拖放到设计界面上.RibbonAddIn.cs的属性设置如下图所示:

1. 后台代码如下:
   
2. 　　1 using System;
   
3. 　　2 using System.Collections.Generic;
   
4. 　　3 using System.Linq;
   
5. 　　4 using System.Text;
   
6. 　　5 using Microsoft.Office.Tools.Ribbon;
   
7. 　　6
   
8. 　　7 namespace ExcelAddInDemo
   
9. 　　8 {
   
10. 　　9     public partial class RibbonAddIn
    
11. 　　10     {
    
12. 　　11
    
13. 　　12         private void RibbonAddIn_Load(object sender， RibbonUIEventArgs e)
    
14. 　　13         {
    
15. 　　14
    
16. 　　15         }
    
17. 　　16
    
18. 　　17         private void btnAbout_Click(object sender， RibbonControlEventArgs e)
    
19. 　　18         {
    
20. 　　19             System.Windows.Forms.MessageBox.Show("JackWangCUMT!");
    
21. 　　20         }
    
22. 　　21
    
23. 　　22         private void btnShow_Click(object sender， RibbonControlEventArgs e)
    
24. 　　23         {
    
25. 　　24             if (Globals.ThisAddIn._MyCustomTaskPane != null)
    
26. 　　25             {
    
27. 　　26                 Globals.ThisAddIn._MyCustomTaskPane.Visible = true;
    
28. 　　27             }
    
29. 　　28         }
    
30. 　　29
    
31. 　　30         private void btnHide_Click(object sender， RibbonControlEventArgs e)
    
32. 　　31         {
    
33. 　　32             if (Globals.ThisAddIn._MyCustomTaskPane != null)
    
34. 　　33             {
    
35. 　　34                 Globals.ThisAddIn._MyCustomTaskPane.Visible = false;
    
36. 　　35             }
    
37. 　　36         }
    
38. 　　37     }
    
39. 　　38 }
    
40. 　　3 ThisAddIn逻辑编写
    
41. 　　1 using System;
    
42. 　　2 using System.Collections.Generic;
    
43. 　　3 using System.Linq;
    
44. 　　4 using System.Text;
    
45. 　　5 using System.Xml.Linq;
    
46. 　　6 using Excel = Microsoft.Office.Interop.Excel;
    
47. 　　7 namespace ExcelAddInDemo
    
48. 　　8 {
    
49. 　　9     using Microsoft.Office.Tools;
    
50. 　　10     public partial class ThisAddIn
    
51. 　　11     {
    
52. 　　12         public CustomTaskPane _MyCustomTaskPane = null;
    
53. 　　13
    
54. 　　14         private void ThisAddIn_Startup(object sender， System.EventArgs e)
    
55. 　　15         {
    
56. 　　16             UCTaskPane taskPane = new UCTaskPane();
    
57. 　　17             _MyCustomTaskPane = this.CustomTaskPanes.Add(taskPane， "我的任务面板");
    
58. 　　18             _MyCustomTaskPane.Width = 30;//height有问题，此处width ==height
    
59. 　　19             _MyCustomTaskPane.Visible = true;
    
60. 　　20             _MyCustomTaskPane.DockPosition = Microsoft.Office.Core.MsoCTPDockPosition.msoCTPDockPositionTop;
    
61. 　　21
    
62. 　　22             UCPaneLeft panLeft = new UCPaneLeft();
    
63. 　　23             _MyCustomTaskPane = this.CustomTaskPanes.Add(panLeft， "组织");
    
64. 　　24             _MyCustomTaskPane.Width = 200;
    
65. 　　25             _MyCustomTaskPane.Visible = true;
    
66. 　　26             _MyCustomTaskPane.DockPosition = Microsoft.Office.Core.MsoCTPDockPosition.msoCTPDockPositionLeft;
    
67. 　　27
    
68. 　　28             UCTaskGrid panRight = new UCTaskGrid();
    
69. 　　29             _MyCustomTaskPane = this.CustomTaskPanes.Add(panRight， "用户列表");
    
70. 　　30             _MyCustomTaskPane.Width = 200;
    
71. 　　31             _MyCustomTaskPane.Visible = true;
    
72. 　　32             _MyCustomTaskPane.DockPosition = Microsoft.Office.Core.MsoCTPDockPosition.msoCTPDockPositionRight;
    
73. 　　33
    
74. 　　34             UCLog panLog = new UCLog();
    
75. 　　35             _MyCustomTaskPane = this.CustomTaskPanes.Add(panLog， "日志列表");
    
76. 　　36             _MyCustomTaskPane.Width = 60;
    
77. 　　37             _MyCustomTaskPane.Visible = true;
    
78. 　　38             _MyCustomTaskPane.DockPosition = Microsoft.Office.Core.MsoCTPDockPosition.msoCTPDockPositionBottom;
    
79. 　　39
    
80. 　　40             //Hook into the workbook open event
    
81. 　　41             //This is because Office doesn't always have a document ready when this method is run
    
82. 　　42             this.Application.WorkbookActivate += Application_WorkbookActivate;
    
83. 　　43             //test
    
84. 　　44             //this.Application.SheetSelectionChange += Application_SheetSelectionChange;
    
85. 　　45         }
    
86. 　　46
    
87. 　　47         void Application_SheetSelectionChange(object Sh， Excel.Range Target)
    
88. 　　48         {
    
89. 　　49             if (this.Application != null)
    
90. 　　50             {
    
91. 　　51                 this.Application.Caption = this.Application.ActiveCell.Address.ToString();//$A$1
    
92. 　　52                 //+ this.Application.ActiveCell.AddressLocal.ToString();//$A$1
    
93. 　　53                 //this.Application.ActiveCell.Formula = "=sum(1+2)";
    
94. 　　54
    
95. 　　55             }
    
96. 　　56         }
    
97. 　　57
    
98. 　　58         void Application_WorkbookActivate(Excel.Workbook Wb)
    
99. 　　59         {
    
100. 　　60             //using Microsoft.Office.Tools.Excel 和 using Microsoft.Office.Interop.Excel 都有worksheet等，容易混淆
     
101. 　　61             //string path = this.Application.ActiveWorkbook.FullName;
     
102. 　　62             Excel._Worksheet ws = (Excel._Worksheet)this.Application.ActiveWorkbook.ActiveSheet;
     
103. 　　63             ws.Cells[2， 2] = "ID2";
     
104. 　　64             //如何设置只读等有待研究
     
105. 　　65             int r=2，c=2;
     
106. 　　66            //((Excel.Range)ws.Cells[r， c]).NumberFormat = format;
     
107. 　　67             ((Excel.Range)ws.Cells[r， c]).Value2 = "ID";
     
108. 　　68             ((Excel.Range)ws.Cells[r， c]).Interior.Color =System.Drawing. ColorTranslator.ToOle(System.Drawing.Color.Red);
     
109. 　　69             //((Excel.Range)ws.Cells[r， c]).Style.Name = "Normal";
     
110. 　　70             ((Excel.Range)ws.Cells[r， c]).Style.Font.Bold = true;
     
111. 　　71
     
112. 　　72             #region format
     
113. 　　73             ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("A2"， "E10")).Font.Bold = true;
     
114. 　　74             ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("A2"， "E10")).Font.Italic = true;
     
115. 　　75             ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("A2"， "E10")).Font.Color = System.Drawing.Color.FromArgb(96， 32， 0).ToArgb();
     
116. 　　76             ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("A2"， "E10")).Font.Name = "Calibri";
     
117. 　　77             ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("A2"， "E10")).Font.Size = 15;
     
118. 　　78
     
119. 　　79             //border
     
120. 　　80             Excel.Range range = ((Microsoft.Office.Interop.Excel.Range)ws.get_Range("B2"， "E3"));
     
121. 　　81             Excel. Borders border = range.Borders;
     
122. 　　82             border[Excel.XlBordersIndex.xlEdgeBottom].LineStyle =Excel. XlLineStyle.xlContinuous;
     
123. 　　83             border.Weight = 2d;
     
124. 　　84             border[Excel.XlBordersIndex.xlEdgeTop].LineStyle = Excel.XlLineStyle.xlContinuous;
     
125. 　　85             border[Excel.XlBordersIndex.xlEdgeLeft].LineStyle = Excel.XlLineStyle.xlContinuous;
     
126. 　　86             border[Excel.XlBordersIndex.xlEdgeRight].LineStyle = Excel.XlLineStyle.xlContinuous;
     
127. 　　87             #endregion
     
128. 　　88             ws.Cells[2， 4] = "First";
     
129. 　　89             ws.Cells[3， 2] = "Last";
     
130. 　　90             ws.Cells[3， 4] = "Email";
     
131. 　　91         }
     
132. 　　92         private void ThisAddIn_Shutdown(object sender， System.EventArgs e)
     
133. 　　93         {
     
134. 　　94         }
     
135. 　　95
     
136. 　　96         #region VSTO 生成的代码
     
137. 　　97
     
138. 　　98         /// <summary>
     
139. 　　99         /// 设计器支持所需的方法 - 不要
     
140. 　　100         /// 使用代码编辑器修改此方法的内容。
     
141. 　　101         /// </summary>
     
142. 　　102         private void InternalStartup()
     
143. 　　103         {
     
144. 　　104             this.Startup += new System.EventHandler(ThisAddIn_Startup);
     
145. 　　105             this.Shutdown += new System.EventHandler(ThisAddIn_Shutdown);
     
146. 　　106         }
     
147. 　　107
     
148. 　　108         #endregion
     
149. 　　109     }
     
150. 　　110 }

复制代码