如何快速将多个excel工作表批量另存为单独的工作簿
发布时间：2022-02-08 19:46:45
标签：代码,保存,工作,选择,Excel函数
有时会遇到这种情况，某个Excel工作簿中包含许多工作表，需要把其中的某个工作表发送给其他用户，或者将某几个工作表发送给不同的用户，通常的做法是将这些工作表移动或复制到新工作簿中，保存后再发送给他们。当工作表的数量较多时，逐一手动操作显得有些繁琐，这时用下面的VBA代码就非常方便了，方法如下：
按Alt+F11，打开VBA编辑器，在代码窗口中粘贴下列代码：
Sub SaveSheetAsWorkbook()
Dim theName As String
On Error GoTo Line1
For Each sht In ActiveWindow.SelectedSheets
sht.Copy
theName = ThisWorkbook.Path & ThisWorkbook.Name & "_" & sht.Name & ".xls"
ActiveWorkbook.SaveAs Filename:=theName, FileFormat:=xlNormal
ActiveWindow.Close
Next
Line1:
End Sub
关闭VBA编辑器，返回Excel界面，选择需要单独保存为工作簿的工作表，如果要选择多个工作表，可按Ctrl键或Shift键进行选择，然后按Alt+F8打开“宏”对话框，选择“SaveSheetAsWorkbook”宏执行即可。
上述代码将每个所选的工作表单独保存为一个工作簿，存放位置与原工作簿相同，名称为“原工作簿名称_工作表名称.xls”。如果是在新建且未保存的工作簿中运行代码，Excel会将新生成的工作簿保存到默认的文件位置，如“我的文档”。
0
投稿猜你喜欢
- 我们经常在使用Excel的时候，会用到许多的函数。如果你不会使用函数，那就证明你还是个Excel表格的新手。俗话说得好，不会使用Excel函
在Windows系统中，开始菜单中的搜索功能可以大大缩短用户查找功能、应用的时间。但是最近有不少用户在使用搜索的时候，出现搜索结果点击却毫无- 这篇文章主要介绍了Windows8下设置蓝牙配对的操作步骤,本文使用右下角打开蓝牙设置,如果右下解没有,可以去控制面板中找找,前提是你的电脑
- 打开Excel 文件，发现数据输入时每次手动打小数点比较麻烦。怎么样在输入数据之后自动添加小数点呢？我们今天一起来看一下吧！首先点击最右上方
- 如何用excel对数据进行随机排序?数据的随机排列在工作生活中也同样经常遇到，我们对数据进行随机排列主要是引入一个辅助列，再调用rand随机
- 最近有用户在开机时电脑提示“please power down and connect the pcie power cable（s） fo
- 没有任何人能够保证在 Excel 中输入的公式永远正确，当出现问题时，应该首先了解导致问题的大致原因，以便找到问题解决的方法。表 1-列出了
- 大家不要看到PowerShell这个陌生的事物就觉得它很高深，其实它是一种用来执行命令的行外壳程序和脚本环境。我们来看看在Win10系统中如
- 我们在使用微星品牌笔记本电脑的时候，有的情况下电脑出现了一些无法修复的问题导致不能正常开机使用，很多小伙伴都会想给自己的电脑重装操作系统。那
- 一般网上放出的win10预览版官方ISO镜像都是英文版的，所以很多朋友都需要再去下载一个win10预览版的中文语言包。那么如何安装win10
- word如何编写公式？Word中数学公式是经常会使用到的，若是要在文档中录入一些复杂的公式，要怎么做呢？接下来小编就来给大家讲一讲具体操作，
- 最近有win10用户反映自己在操作系统的时候，出现黑屏的情况且系统提示堆栈溢出，这是什么情况？可能是因为电脑的运行内存不足导致的，可以尝试在
- 在PowerPoint演示文稿中有普通视图，大纲视图，幻灯片浏览视图，备注页视图，阅读视图等等视图。我们最熟悉的就是普通视图了，我们通常都是
- iOS 12.0 已经非常好用，很多用户担心后续更新过高硬件的要求可能会导致设备运行缓慢卡顿，那么如何屏蔽 iOS 更新推送呢？其实借助「爱
- EXCEL中字符倒序排列确实很难弄，主要使用了VBA，可果单纯要使用函数，也可以实现，不过还要自动判断字长，执行次数，很是麻烦。今天，小编就
- word自选图形输入的文字怎么设置居中？word文档中中插入了自选图形并设置为文本框，在文本框中输入的文字想要设置居中，该怎么设置呢？下面我
- 作为国内仅剩的几款网盘产品之一，百度网盘的市场占有率是绝对的 No.1。去年底，百度网盘的月活用户已经达到 8703 万，月活用户份额达 8
- 相信大家对usb蓝牙适配器都不会感觉到陌生，实际上作为一种连接数码产品的小工具，usb蓝牙适配器依据实际使用情况的不同可以细细分为多个类别，
- 在我们使用Word进行编辑时会用到斜线，下面我们来看一下在Word中画斜线的方法。1、打开word文档，在文档工具栏中点击“插入”并选择“形
- 有时我们需要在wps表格里插入箭头来链接，这时我们应该怎么做呢?下面就让小编告诉你怎在WPS表格中插入箭头 的方法。WPS表格插入箭头的方法
