部分内容对比替换

Aotenjo168

cutecpu 发表于 2021-1-31 20:20
=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1: ...

大师，不才愚昧，如果C，D颜色对照的两列位于另外一个名为【颜色对照】的表格，则该代码又当如何变动？
本人所有电脑即将全部安装Excel2019。

cutecpu

Aotenjo168 发表于 2021-2-5 21:18
大师，不才愚昧，如果C，D颜色对照的两列位于另外一个名为【颜色对照】的表格，则该代码又当如何变动？
...

=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1:$20)),99),1),,IFNA(VLOOKUP(T(IF(1,TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))),C:D,2,),TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))
)&";"

原本C:D 部份，改成【顏色對照】表格相對應區域

祝順心，南無阿彌陀佛！

Aotenjo168

cutecpu 发表于 2021-2-5 22:50
=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1: ...

试了。。。Excel2019
表格01.rar (8.35 KB, 下载次数: 1)

2021-2-6 17:57 上传

点击文件名下载附件

cutecpu

Aotenjo168 发表于 2021-2-6 17:57
试了。。。Excel2019

=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1:$20)),99),1),,IFNA(VLOOKUP(T(IF(1,TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))),顏色對照!A:B,2,),TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))
)&";"

祝順心，南無阿彌陀佛！

Aotenjo168

cutecpu 发表于 2021-2-6 19:27
=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1: ...

大师，代码没问题，唯有$:$引用多了，单元格下拉填充多了，CPU占满。VLOOKUP函数能不能替代$:$引用呢。

cutecpu

Aotenjo168 发表于 2021-2-9 12:42
大师，代码没问题，唯有$:$引用多了，单元格下拉填充多了，CPU占满。VLOOKUP函数能不能替代$:$引用呢。
...

您好，可以上傳附件嗎？

Aotenjo168

cutecpu 发表于 2021-2-9 14:40
您好，可以上傳附件嗎？

颜色转换.rar (17.12 KB, 下载次数: 5)

2021-2-9 20:25 上传

点击文件名下载附件 大师，这个表格款号列复制款号进去，要非常卡个很久。当然原因是完成列里填充单元格很多，但最终原因应该还是代码里的引用。

cutecpu

Aotenjo168 发表于 2021-2-9 20:28
大师，这个表格款号列复制款号进去，要非常卡个很久。当然原因是完成列里填充单元格很多，但最终原因应该 ...

您好，能把 B 列「款號」加上嗎？公式不用沒關係，只要資料就好

Aotenjo168

cutecpu 发表于 2021-2-9 21:13
您好，能把 B 列「款號」加上嗎？公式不用沒關係，只要資料就好

加上款号后仅仅打开表格看看，不会感觉卡顿，但您可以试着复制或手输一个进去，比如
1*PCK-BLACK-XL;

然后点点其他看，表格就卡了。如果复制几百个进去，直接CPU100%

cutecpu

Aotenjo168 发表于 2021-2-9 22:29
加上款号后仅仅打开表格看看，不会感觉卡顿，但您可以试着复制或手输一个进去，比如
1*PCK-BLACK-XL;

...

=TEXTJOIN(MID(B2,IFERROR(SMALL(IF(ISNUMBER(FIND(MID(B2,ROW($1:$20),1),"*-_")),ROW($1:$20)),ROW($1:$20)),99),1),,IFNA(VLOOKUP(T(IF(1,TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))),颜色对照!A$2:B$80,2,),TRIM(MID(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(LEFT(B2,LEN(B2)-1),"-","*"),"_","*"),"*",REPT(" ",99)),99*ROW($1:$9)-98,99)))
)&";"

用上面公式試試(藍色部份給定範圍)！還有，紅色、澄色部份不需要放大到 1000 喔

祝順心，南無阿彌陀佛！