拆出数字

举例

Excel文件book1.xlsx中有一列混合了字符和数字的数据，其中数字可能在多处出现，且出现规律不定。数据如下图所示：

现在想要将每一行中的所有数字分离出来，并将分离出来的结果放置到 B 列，期望效果如下图：

编写SPL脚本：

	A
1	=clipboard().import@i()
2	=A1.(~.words@d().concat())
3	=clipboard(A2.concat("\n"))

A1   读入剪贴板数据，选项@i表示读成序列

A2   循环A1的每个字符串，用words@d拆出串的所有数字串组成序列，再用concat将每个数字连在一起

A3   将A2的各字符串用\n连接成串后，放入剪贴板中

运行时先打开book1.xlsx，选择A1:A5区域，按Ctrl+C复制，进入集算器中运行SPL脚本，运行结束后回到Excel，点击B1，按Ctrl+V将剪贴板中的结果粘贴过来。