我需要使用“,”作为分隔符。
如何将点转换为逗号?
With ThisWorkbook.Worksheets("RAW").Range("A1")
.Value = Replace(.Value, ".", ",")
End With
有什么办法可以将其存储为通用/数字?
我试过了
With ThisWorkbook.Worksheets("RAW").Range("A1")
.NumberFormat = "General"
.Value = Replace(.Value, ".", ",")
.NumberFormat = "General"
.Value = .Value
End With
一个单元格可以通过以下方法快速解决:
.Value = Replace(.Value, ".", ",")*1
或者:
.Value = CSng(Replace(.Value, ".", ","))
如果碰巧需要处理的范围,可以使用:
Sub Test()
With ThisWorkbook.Worksheets("RAW").Range("A1:A3")
.Replace ".", ","
.TextToColumns
End With
End Sub
每列:
Sub Test()
With ThisWorkbook.Worksheets("RAW").Range("C2:D4")
.Replace ".", ","
For Each col In .Columns
col.TextToColumns
Next
End With
End Sub
好的,但我收到错误消息:“ Microsoft Office Excel一次只能转换一列。范围可以是多行,但不能超过一列。要通过仅选择一列中的单元重试”,如何遍历多列?