excel vba复制工作表办法及案例图文教程|雨林木风下载站

Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。

Excel中的vba复制工作表，一般是使用Copy方法。但往往复制的要求不同，因此代码也有所不同。我们以两个常用的vba复制工作表例子来加以说明和学习。

　　vba复制工作表案例一

Sub vba复制工作表()
? Worksheets("sheet1").Copy Before:=Worksheets("sheet2")
End Sub

　　说明：上面代码的意思是：在当前工作簿中复制工作表sheet1并将所复制的工作表放在工作表sheet2之前。

　　又比如：Worksheets("sheet2").Copy After:=Worksheets("sheet3")，这句代码的意思就是在当前工作簿中复制工作表sheet2并将所复制的工作表放在工作表sheet3之后。

　　Copy方法带两个可选参数，Before和After，使用时两个参数任选其一。

　　vba复制工作表案例二

Sub vba复制工作表()
??? Dim bok As Workbook
??? ActiveSheet.Copy
??? Set bok = ActiveWorkbook
??? bok.SaveAs "blwbbs.xlsx"
End Sub

　　说明：上面代码的意思是将当前打开的工作薄中的当前工作表，复制到同一路径，并单独保存为一个工作簿，文件名为blwbbs.xlsx。

Excel整体界面趋于平面化，显得清新简洁。流畅的动画和平滑的过渡，带来不同以往的使用体验。

……