修改同一单元格内的多个不同文本数字格式

cabcyvr

数据源：A1 ，A1内内容（字母+文本数字（长度1-4位，整数或是小数）+换行符号），以下内容是在同一单元格内（因为太过简单就不提供例子文件了

A1.1
B22
CC11.22
D3333
E8

要求：在B1单元格用函数将A1单元格内的所有文本数字前方添加0（数量=5-自身整数部分文本数字长度）。比如CC11.22，整数11长度为2，需要改为CC00011.22

砂海

=LEFT(A1,LEN(A1)-LEN(LOOKUP(9^9,--RIGHT(A1,ROW($1:$18)))))&REPT(0,5-LEN(INT(LOOKUP(9^9,--RIGHT(A1,ROW($1:$18))))))&LOOKUP(9^9,--RIGHT(A1,ROW($1:$18)))

cabcyvr

砂海 发表于 2019-11-3 09:39
=LEFT(A1,LEN(A1)-LEN(LOOKUP(9^9,--RIGHT(A1,ROW($1:$18)))))&REPT(0,5-LEN(INT(LOOKUP(9^9,--RIGHT(A1,RO ...

多谢指教，但是测试了一下，好像只对最后一的数字起作用

cutecpu

B1 陣列公式: =
SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
TEXJOIN(,,
IF(
ISERR(--MID(SUBSTITUTE(SUBSTITUTE(A1,CHAR(10),"    "),".","0"),ROW($1:$40),1)),
MID(SUBSTITUTE(SUBSTITUTE(A1,CHAR(10),"    "),".","0"),ROW($1:$40),1),""
)&
IF(
ISERR(--MID(SUBSTITUTE(SUBSTITUTE("$"&A1,CHAR(10),"    "),".","0"),ROW($1:$40),1))*
ISNUMBER(--MID(SUBSTITUTE(A1,CHAR(10),"    "),ROW($1:$40),1)),
TEXT(MID(SUBSTITUTE(A1,CHAR(10),"    "),ROW($1:$40),5),"00000.###"&CHAR(10)),""
)
)
,"."&char(10),char(10))," ","")&"$",char(10)&"$","")

說明:
藍色: 文本
橙色: 數字(整數補滿5位)
紅色: 去除多餘小數點、空白、結尾空行
      :  有 4 格空白


祝順心，南無阿彌陀佛！

cabcyvr

cutecpu 发表于 2019-11-3 14:47
B1 陣列公式: =
SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
TEXJOIN(,,

大侠你是在行动电话上输入的格式吧？？ （猜的），不然”TEXjoin“都会出来。。。。

测试了一下，针对例子中的文本Ok，但是按照输入规则修改一下好像还是有一点点问题

我先自己根据你的思路自己想一下。

cutecpu

cabcyvr 发表于 2019-11-6 15:30
大侠你是在行动电话上输入的格式吧？？ （猜的），不然”TEXjoin“都会出来。。。。

测试了一下，针对 ...

Hello 兄弟，
1. 哈哈，被兄弟發現了 → TEXjoin ：因為我沒有 Excel 2016 ，所以TEXTJOIN 以後都是人工加上的，沒經過 Excel 測試！
2. 第二筆測資裡倒數第二個: D3333.5 ← 紅色部份超過四位了，跟原先的 SPEC 不符喔！
3. E9.5 消失的部份: 把 40 放大試試

cabcyvr

cutecpu 发表于 2019-11-6 15:37
Hello 兄弟，
1. 第二筆測資裡倒數第二個: D3333.5 ← 紅色部份超過四位了，跟原先的 SPEC 不符喔！
2. ...

哦？有界肿斯琴？？ 漏渴了一下，是我描述不清，我先根据你的公式自己想一下。