[已解决]不规则空格替换为2个空格，盼版主回复

oob111

可以另存到数组arr(1 to 2,1 to 7)，方便使用，然后输出到c:\2.txt

sliang28

oob111 发表于 2013-10-25 13:51
可以另存到数组arr(1 to 2,1 to 7)，方便使用，然后输出到c:\2.txt

写入时每个数据间间隔两个空格

香川群子

简单问题复杂化了……


楼主的问题，描述为：
字符串中间夹杂有数量不等的空格，需要读取为数组。

那么，用Trim函数处理，外套Split拆分就足够了。

s1 = "11111 2222 3333  0   0.001    1 2"
arr = Split(Application.Trim(s1))