Excel如今在现代工作中的作用越来越重要，是办公的必备工具，那么如何使用编程的方式实现为工作簿添加工作表呢？
工具/原料
Free Spire.XLS for .Net 9.2 免费版
VS 2013
C#实现:
1、第一步：创建一个窗体应用程序，在解决方案中的引用选择项右键添加引用；
3、第三步：双击button进入代码编辑页面，代码如下（在顶部引用Spire.XLS）； pr坡纠课柩ivate void bt荏鱿胫协nRun_Click(object sender, EventArgs e) { //从系统中加载工作簿文件 Workbook workbook = new Workbook(); workbook.LoadFromFile(@"C:\Users\Administrator\Desktop\AddWorksheet.xlsx"); //添加一个新工作表命名为“AddedSheet” Worksheet sheet = workbook.Worksheets.Add("AddedSheet"); sheet.Range["C5"].Text = "This is a new sheet"; //保存并启动 workbook.SaveToFile("Output.xlsx", ExcelVersion.Version2010); ExcelDocViewer(workbook.FileName); } private void ExcelDocViewer(string fileName) { try { System.Diagnostics.Process.Start(fileName); } catch { } } private void btnClose_Click(object sender, EventArgs e) { Close(); }
4、第四步，运行成果如下：
VB .NET 实现：
1、除代码以外其余步骤同C#一样。代码如下：Private Sub btnRun_Click(ByVal sender As Object, By蕺清寤凯Val e As EventArgs) Handles btnRun.Click '从系统中加载工作簿 Dim workbook As New Workbook() workbook.LoadFromFile("C:\Users\Administrator\Desktop\AddWorksheet.xlsx ") '添加一个新的工作表命名为“AddedSheet” Dim sheet As Worksheet = workbook.Worksheets.Add("AddedSheet") sheet.Range("C5").Text = "This is a new sheet." '保存并运行 workbook.SaveToFile("Output.xlsx",ExcelVersion.Version2010) ExcelDocViewer(workbook.FileName) End Sub Private Sub ExcelDocViewer(ByVal fileName As String) Try Process.Start(fileName) Catch End Try End Sub Private Sub btnClose_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnClose.Click Close() End Sub
