|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
数字=TRIM(MID(CONCAT(IF(NOT(ISNUMBER(--MID($A$1,ROW(INDIRECT("1:"&LEN($A$1))),1))),IF(NOT(ISNUMBER(--MID("a"&$A$1,ROW(INDIRECT("1:"&LEN($A$1))),1))),"",REPT(" ",99)),MID($A$1,ROW(INDIRECT("1:"&LEN($A$1))),1))),1+(ROW(A1)-1)*99,99))
文字=TRIM(MID(CONCAT(IF(ISNUMBER(--MID($A$1,ROW(INDIRECT("1:"&LEN($A$1))),1)),IF(ISNUMBER(--MID("a"&$A$1,ROW(INDIRECT("1:"&LEN($A$1))),1)),"",REPT(" ",99)),MID($A$1,ROW(INDIRECT("1:"&LEN($A$1))),1))),99*ROW(A1),99))
|
|