原始数据是这样的:
怎么处理后,能变成下图所示的样子:
最好用VBA实现。谢谢!!!!
Sub SplitData()
Dim a
a = Split(Cells(1, 1), " ")'将A1单元格内容分割为数组
Cells(5, 1).Resize(, UBound(a) + 1) = a'将数组元素赋值给指定单元格区域
End Sub
Dim a
a = Split(Cells(1, 1), " ")'将A1单元格内容分割为数组
Cells(5, 1).Resize(, UBound(a) + 1) = a'将数组元素赋值给指定单元格区域
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答 2013-10-07
这个简单,还有你应该知道代码放哪吧?
sub a()[a1].resize(3,1).texttocolumns space:=true
end sub
第2个回答 2013-10-07
可以不用代码, 不要搞那么复杂
如果都是空格分隔的话, 桌面新建一个text文件文件, 拷贝粘贴进去, 然后用excel打开这个文本文件, 分隔符选空格, 就ok了追问
如果都是空格分隔的话, 桌面新建一个text文件文件, 拷贝粘贴进去, 然后用excel打开这个文本文件, 分隔符选空格, 就ok了追问
是这样的,我想做个Log数据的解析工具。这个功能只是其中的一项,所以用函数来实现比较好。还是谢谢你哈
追答主要是看量, 如果很多文件需要处理, 那写段代码省点时间
如果只是几个文件, 格式又很单一, 手工操作估计比写代码时间还短