VBA 条件式COPY工作表, 排序及标示 ( 工作表汇总 )

On_fire · 发表于 2023-1-10 11:09

本帖最后由 On_fire 于 2023-1-10 11:12 编辑

*

文件夹内,

文件A是源数据

( 含大量工作表, 表名是唯一值, 表内第1行是标题行 )

*

文件夹内,

文件B的Sheet1是A列是关键词

*

执行代码的逻辑如下,

1. 由上到下, 顺序取文件B的Sheet1的A列关键词

2. 顺序配对文件A的工作表名 ( 表名是唯一值 ), COPY整表, 顺序左到右添加到文件B

3. 文件B添加的工作表的行数据, 以AA列为关键词,以Sheet1的A列顺序排 ( *标题行不用排 )

4. 文件B的添加工作表中, AA列的关键词如有参加排序, 标黄

5. 文件B的Sheet1的A列, 如没有找到同名的工作表, 要标红

*

文件B(1)内工作表有详细模拟及结果

*

恳请大神, 老师出手帮忙...谢谢!

LIUZHU · 发表于 2023-1-10 11:17

有点糊涂，一下A，一下B

LIUZHU · 发表于 2023-1-10 11:20

这句看不懂，AA列为关键词，为什么有涉及到Sheet1的A列顺序排？
“文件B添加的工作表的行数据, 以AA列为关键词,以Sheet1的A列顺序排 ( *标题行不用排 )”

LIUZHU · 发表于 2023-1-10 11:23

根据问题意思，A工作簿的Sheet1表，好像没什么作用？

On_fire · 发表于 2023-1-10 11:39

本帖最后由 On_fire 于 2023-1-10 11:54 编辑

LIUZHU 发表于 2023-1-10 11:23
根据问题意思，A工作簿的Sheet1表，好像没什么作用？

老师好,
文件A的工作表是源数据,
你要打开文件B(1), 才看到逻辑...

LIUZHU · 发表于 2023-1-10 14:09

On_fire 发表于 2023-1-10 11:39
老师好,
文件A的工作表是源数据,
你要打开文件B(1), 才看到逻辑...

我这里只有WPS，写JS可以不？

On_fire · 发表于 2023-1-10 14:17

LIUZHU 发表于 2023-1-10 14:09
我这里只有WPS，写JS可以不？

我这没有WPS,
但估计可能有同学可以借镜您的思路, 用JS写成VBA...

LIUZHU · 发表于 2023-1-10 14:20

On_fire 发表于 2023-1-10 14:17
我这没有WPS,
但估计可能有同学可以借镜您的思路, 用JS写成VBA...

不可以，JS的数组功能，VBA可没有

On_fire · 发表于 2023-1-11 09:07

早上好,
大神, 老师们, 顶一下...
希望文件A在不打开的情况下, 可执行文件B内的代码

leirongqin · 发表于 2023-1-11 09:12

又来出难题

		自动登录	找回密码
密码			免费注册

[求助] VBA 条件式COPY工作表, 排序及标示 ( 工作表汇总 )