年景@-CSDN博客

原创 7、VBA生成带超链接的目录

（1）如果不存在“目录”的工作表，则在第一个工作表前插入一个新的工作表，并命名为“目录”，在A列填充序号，在B列填充工作表目录；代码的主要逻辑：首先遍历工作簿下所有的工作表，确定是否存在名为“目录”的工作表。（2）如果已存在“目录”的工作表，则结束程序的执行。注：代码设置对于隐藏的工作表，不在生成的工作表目录中。

2024-06-11 11:57:40 416

原创 6、根据指定列排序，不同行填充不同颜色

Excel表中利用VBA，对不同行填充不同颜色进行区分，方便查看。

2024-05-19 16:41:26 160

原创 5、提取多工作簿指定工作表（名字查找），输出一张表

合并文件夹内存在多工作簿文件，每个工作簿中存在多个sheet表。现在要汇总指定sheet表，最后输出在一张sheet表上。

2024-05-19 00:48:26 590

Sub 留右删除() '保留最右侧表格 Dim r As Integer Application.DisplayAlerts = False If Sheets.Count > "2" Then For r = (Sheets.Count - 1) To 1 Step -1 Sheets(r).Delete Next End If Application.DisplayAlerts = TrueEnd

2024-05-13 11:43:34 113

原创 3.1、提取多工作簿中指定工作表(位置查找)，输出一个含多张表的工作簿

【代码】3、提取多工作簿中指定工作表。

2024-05-13 11:36:32 485

原创 2、工作簿（thisworkbook）拆分为多个表（sheet）

【代码】2、工作簿（thisworkbook）拆分为多个表（sheet）

2024-05-13 11:33:15 133

原创 1、拆分工作表（按照客户指定表*指定列）

【代码】1、拆分工作表（按照客户指定表*指定列）

2024-05-13 11:28:01 112

weixin_73737526的博客

原创 10、生成文件夹下所有文件的目录

原创 9、Excel填充空白行/列

原创 8、删除Excel工作表的空行或空列