Excel是许多职场人士常用的烦恼之源,学习相关技巧需耗费大量时间。简道云作为一款办公神器,能很好地替代Excel。它是一个在线表单和数据管理工具,支持PC端和手机微信浏览器操作。除此之外,简道云还能辅助企业进行流程审批、财务报销、人事管理等业务管理,满足不同需求。
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。
excel vba复制工作表方法及实例教程的***:
本地下载