给出以下字符串:
"Data 1998 1999 2000 2001 2002 2003 2004 2005 2006"
我希望能够获取字符串并将数据放在excel电子表格中的10个单独的列中。我正在开发一个用户定义的函数,但它还没有完成工作。
有人已经解决了这个问题吗?
由于
答案 0 :(得分:5)
您也可以使用以下公式执行此操作:http://www.excelforum.com/excel-general/591897-text-to-columns-but-using-a-formula.html
或者使用代码creamyegg发布。
答案 1 :(得分:3)
简单的答案是肯定的。您可以使用VBA Split()
函数返回变量数组。下面会将您的示例字符串放在活动工作表的单元格A1:I1
中:
Dim varArray As Variant
varArray = Split("Data 1998 1999 2000 2001 2002 2003 2004 2005 2006", " ")
ActiveSheet.Range(Cells(1, 1), Cells(1, UBound(varArray))).Value = varArray