如何将小数点更改为小数点逗号？

单个单元格可以通过以下方式快速解决：

.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