0

我想在工作表中使用此 vba 代码将 D 列中的任何逗号替换为句号：

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

我有它工作我确定有一分钟，但它没有！有任何想法吗？？？

4

3 回答 3

1

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

于 2013-07-10T16:29:02.987 回答
0

你已经替换了所有的逗号，它不会再工作了。

于 2013-07-10T16:22:48.287 回答
-1 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

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

End Sub

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

于 2013-07-10T16:20:17.463 回答