Excel vba替换逗号

Question

我想在我的工作表中使用这个vba代码来替换D列中的任何逗号：

ActiveSheet.Columns("D").Replace _
What:=",", Replacement:=".", _
SearchOrder:=xlByColumns, MatchCase:=True

我工作了，我确定了一分钟，但事实并非如此！任何想法???

Answer 1

您在评论中说，您将代码放在Worksheet_SelectionChange中。将代码放在模块中，然后在要使用它时运行它。然后它适用于任何工作表。

Answer 2

你已经替换了所有逗号，它不会再次起作用了。

Answer 3

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveSheet.Columns("D").Replace What:=",", Replacement:=".", SearchOrder:=xlByColumns, MatchCase:=True

End Sub

它确实像这样工作。不要添加“_”