Excel 2010 VBA 入门 065 将多个工作表保存至单独的工作簿中

最新推荐文章于 2024-07-05 17:13:52 发布

ngbshzhn

最新推荐文章于 2024-07-05 17:13:52 发布

阅读量2k

点赞数

分类专栏： # Excel 2010 VBA 入门

本文链接：https://blog.csdn.net/ngbshzhn/article/details/116020078

版权

这篇博客介绍了如何使用Excel 2010 VBA将一个工作簿中的多个工作表分别保存为独立的工作簿。内容包括VBA代码实现，工作簿对象的表示方法，如序号表示法和工作簿名称表示法，以及工作簿的保存、新建和复制工作表的操作。还讨论了SaveAs和Save方法的区别。

摘要由CSDN通过智能技术生成

示例

实现代码

工作簿对象(Workbook)及其表示方法

1．序号表示法

2．工作簿名称表示法

工作簿( Workbook)对象的常用属性

工作簿的新建和保存

获取当前文件的目录

跨工作簿复制工作表

使用Application. PathSeparator获取系统路径分隔符

SaveAs和Save的区别

示例

如图所示，如何利用VBA将该工作簿中的各个工作表分别保存至单独的工作簿中，并将工作簿名称以工作表标签命名？

部门	市场部

员工编号	姓名
0215	林革壮
0233	李卫卿
0247	申玲
0260	孙正发

部门	总经办

员工编号	姓名
0377	卢卫
0391	赵秀池

部门	管理部

员工编号	姓名
0017	周汉林
0018	骈永富
0020	孙玉梅
0023	陈亚菁
0026	康小芸
0028	刘晨
0042	齐光
0052	于健惠
0060	王文群
0066	曾国安
0072	刘志峰
0080	刘玉录
0114	俞卫广

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

ngbshzhn

关注关注

0
点赞
踩
18

收藏

觉得还不错? 一键收藏
打赏
0
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫

专栏目录

Excel VBA小程序01-将多个sheet表另存为单独的工作薄文件并清除原表数据

Nemuel的博客

08-06

4035

另存为xlsx文件的具体步骤按Alt+F11，打开VBA编辑器，在代码窗口中粘贴下列代码，代码大同小异。 1、保存全部表格，不保留分表格式 Sub 复制() Dim Sh As Worksheet Dim wb As Workbook Dim cPath$, cFile$, nR1&, nR2&, Arr() cPath = ThisWorkbook.Path & "\" Application.ScreenUpdating = Fa

Excel·VBA工作簿工作表拆分保存为工作簿

hhhhh_51的博客

03-10

4003

1，当前工作表保存为工作簿； 2，当前工作簿所有工作表保存为单独工作簿； 3，当前工作簿部分工作表保存为工作簿；

参与评论您还未登录，请先登录后发表或查看评论

VBA中打开、保存关闭Excel工作簿的方法

热门推荐

Crystal_Data的博客

08-06

4万+

欢迎使用Markdown编辑器写博客本Markdown编辑器使用StackEdit修改而来，用它写博客，将会带来全新的体验哦： Markdown和扩展Markdown简洁的语法代码块高亮图片链接和图片上传 LaTex数学公式 UML序列图和流程图离线写博客导入导出Markdown文件丰富的快捷键快捷键加粗 Ctrl + B 斜体 Ctrl + I

VBA，群里的问题，如何单独只保存1个sheet，而不是保证整个工作簿workbook?

奔跑的犀牛先生

02-20

3021

问题1 2 代码 '单独一个sheet文件存在问题 'ActiveWorkbook.SaveAs Filename:="C:\A\" & 文件名 ".csv", FileFormat:=xlCSV Sub 导出csv() Dim str1 As String Dim sh1, sh2 As Worksheet Dim p...

Excel 2010 VBA 入门 061 按模板快速生成指定数量的工作表

复行数十步

04-19

2097

目录示例实现代码工作表对象(Worksheet)及其表示方法 1．序号表示法 2．工作表名称表示法 3．对象名称表示法工作表集合和工作表工作表常用的基本属性工作表的添加与复制工作表对象(Worksheet)与单元格对象(Range)的关系工作表的删除 Application. DisplayAlerts属性示例如图所示，该表为某公司在银行的余额汇总。现希望按照模板的格式生成若干张工作表，各工作表以银行名称作为表格名称，并将该银行信息填入表内。如何用V...

Excel 2010 VBA 入门 059 用VBA在工作表中创建文件清单（Dir函数）

复行数十步

04-19

521

目录示例：实现代码 Dir函数 Dir函数查找路径下所有的文件 GetAttr函数获取文件属性 SetAttr语句修改文件属性示例：读取文件信息是进行多工作簿汇总的基本步骤之一，如图所示，如何利用VBA获取A2单元格所示路径的文件夹下所有的文件清单？文件路径 D: 文件清单实现代码 Option Explicit Sub 创建文件清单() Dim sPath As String '文件路径 Dim sFileName As St..

Excel 2010 VBA 入门 074 工作表事件之Workbook_SheetChange

复行数十步

04-28

2486

目录示例实现代码插入模块插入工作薄事件工作簿的Workbook_SheetChange事件工作簿的Workbook_Activate事件事件的组合示例当需要保护某个工作表不被修改时，一般可以将其保护。在VBA中，是否可以设置一个工作表名称的列表（如图所示），当工作表属于该列表中时则不允许改变。该如何实现？实现代码编写一个备份工作表的程序，将当前活动工作表备份，然后在工作簿的Workbook_SheetChange事件中查找其Sh参数所表示的工作表是...

Excel 2010 VBA 入门 140 在功能区添加按钮并运行VBA程序

复行数十步

11-24

4255

目录题码回调（CallBack） IRibbonControl对象题如图所示，该表为员工档案。为了避免该表的数据被修改，该表已经被保护。如何在功能区添加一个按钮，当单击该按钮后可以将该表的数据导出为普通的工作簿。码在工作簿中添加一个按钮的回调过程saveCopy，该过程用以将工作表中的数据导出另存为一个单独的工作簿。然后自定义功能区，在自定义选项卡中添加一个按钮，将其onAction属性设置为该回调过程saveCopy。步骤1 自定义功能区...

VBA一键sheet页另存为Excel

07-03

VBA一键sheet页另存为Excel，批量拆分Excel sheet页为单个文档。

VBA——合并工作表及工作表单独保存的功能

xj246304的博客

05-16

5166

沿用上一篇关于拆分excel工作表的文章的引子，本文分享下多个工作表合并的VBA功能。案例仍使用上篇文章的例子。已知有BS、HR等多个部门，分别存放在独立的以部门命名的工作表中，现需要将多个部门的工作表合并为包含所有部门的一张工作表。实现代码如下：Sub MergeToOneSheet() '取表头 Range("A1:D1") = Sheets(2).Range("A1:D1").Value '...

VBA 实例：拆分每个工作表为单个文件

灵台方寸山斜月三星洞

05-24

1084

复制工作表，生成一个新工作薄。获取当前活动工作薄，然后保存。（说实话，VBA这种思路很别扭。Copy竟然没返回值。） Sub Split2Book() Dim xPath As String xPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each xWs In Th.

WPS使用VB批量将多个sheet单独存储为xls文件

风一样的自由，色彩斑斓的雨季

11-02

2446

1、首先下载安装VBA安装包，确保WPS能够使用宏。安装包自行百度下载。 2、打开一个多sheet的工作表，点击开发工具，VB编辑器。 3、打开VB编辑器后如图所示 4、右键点击project->插入->模块，粘贴如下代码 Sub SaveSheetAsWorkbook() Dim sht As Worksheet For Each sht In Sheets sht.Copy theName = ThisWorkbook.Path & "\" &.

实用VBA：8.一键输出多表格为单独文件

周公笃行的博客

11-28

806

工作中常常遇到需要把保存在一个Excel文件中的若干个工作表分别保存为单独文件。例如：把一年中各个月份的绩效考核分别输出；把部门每个人的简历分别输出；把全校所有学生的成绩单分别输出……

使用VBA将不同工作表拆分为单独的工作簿：实战指南

但老师

09-01

1264

在处理大量数据时，Excel工作簿常常包含多个工作表。有时，我们需要将这些不同的工作表拆分为单独的工作簿，以便于分别处理或保存。这种情况下，我们可以利用VBA来实现这一目标。VBA是一种基于Visual Basic的编程语言，内嵌于Microsoft Office套装软件中。通过编写VBA代码，我们可以自动化Excel操作，包括将不同工作表拆分为单独的工作簿。这样，每个不同的工作表就会被拆分为一个单独的工作簿，并保存到原始Excel文件中。

Excel用代码将工作表保存为工作簿

bornonew的博客

12-21

2561

今天，做会计的朋友问我一个问题，怎么讲Excel的工作表拆分成单独的文件，并给我发了一个链接。 https://jingyan.baidu.com/article/75ab0bcb0ecc67d6874db27e.html 说这个在他那执行不了，他还以为是office是非正版，专门买了个正版的。随便试了下，发现能执行，让他截图，发现是他的工作表都是用日期命名的，比

Excel.Application: SaveAs之fileformat 收藏

sh_chenjian的专栏

11-12

6121

Excel.ApplicationSaveAs中的第二個參數的值：可以直接用10进制的值代替左边的这些 xl类型. fileformat 类型十进制值具体文件类型 xlAddIn18 Microsoft Excel 2007 Add-In xlAddIn8

VBA在Excel中的工作簿与工作表事件处理

"VBA在Excel中的应用主要体现在工作簿和工作表的事件处理上，通过编程实现自动化操作，提高工作效率。" 在Excel中，VBA（Visual Basic for Applications）是一种强大的工具，允许用户自定义功能，自动化重复任务。...