《excel vba复制工作表.docx》由会员分享,可在线阅读,更多相关《excel vba复制工作表.docx(1页珍藏版)》请在三一办公上搜索。
excel vba复制工作表excel vba复制工作表 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。