VBA工作表操作之拆分工作表
2020-04-25 19:00
1061 查看
VBA–同一个工作簿中如何拆分工作表
Sub 拆分工作表()
Dim sht As Worksheet
Dim wb As Workbook
For Each sht In Worksheets
sht.Copy
Set wb = ActiveWorkbook
wb.SaveAs Filename:=thisworkbook.path & “” & Sheets(1).Name & “.xlsx” '保存在该工作簿同一个路径下
wb.Close True
Next
End Sub
- 点赞
- 收藏
- 分享
- 文章举报
相关文章推荐
- VBA异常--运行时错误1004(将一个工作簿拆分多个工作表)
- VBA【遍历每个工作表并将工作表表名赋予B2单元格】
- VBA代码实例---一个工作表拆分为N个工作表
- VBA工作表的操作详解
- Excel VBA 将当前活动工作表中的图片保存到以工作表名称命名的文件夹内
- EXCEL vba 实现通过超链接跳转到隐藏工作表 回到目录隐藏打开工作表
- Java Jxl Excel 操作总结2(基本操作:创建工作薄,工作表,单元格等)
- 工作需求——VBA操作打印机
- VBA基础之Excel 工作表(Sheet)的操作(二)
- excel将一个工作表根据条件拆分成多个工作表图文教程
- 在VBA操作Excel单元格的方式小结
- 第五课 利用VBA设置工作表使用权限
- ★★Excel-VBA操作文件四大方法之二 by excelhome
- 使用java.io.*操作文件的拆分与合并,Application一例!
- (工作笔记)数据分批次操作,封装方法(sql添删改查)
- HLJU 1105 cpc 喵喵的拆分集合 (并查集的逆向操作)
- 用VBA对一个EXCEL中的多个工作表排序
- C#中工作线程和多线程跨线程操作控件
- VBA对MySql数据库进行读取和写入操作
- VBA中如何清空工作表内容