Answers:
您是否尝试过使用“ 文本到列”?
您也可以在两个单独的列中使用两个公式。
要获取逗号左边的值:
=0+LEFT(K1,FIND(",",K1)-1)
要获得逗号右边的值:
=0+RIGHT(K1,LEN(K1)-FIND(",",K1))
其中K1
包含初始字符串,例如401.50,0.027
** 0+
在公式将提取的子字符串转换为数值数据之前。
写一点VBA来处理您的列表
假定值列表位于单个单元格中并被选中。将结果放在以下单元格中
Sub zx()
Dim a() As String
Dim v As Variant
Dim i As Long
Dim j As Long
a = Split(ActiveCell.Value, " ")
ReDim v(1 To UBound(a) + 1, 1 To 2)
For i = 1 To UBound(a) + 1
j = InStr(a(i - 1), ",")
v(i, 1) = Val(Left(a(i - 1), j - 1))
v(i, 2) = Val(Mid(a(i - 1), j + 1))
Next
ActiveCell.Offset(1, 0).Resize(UBound(a) + 1, 2) = v
End Sub