excel - VBA 去掉逗号

Question

Sub Removecomma()


        Range("R2:R100").Replace What:=",", Replacement:=" ", LookAt:=xlWhole, _
        SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False


End Sub

我正在尝试删除 R 列中的所有逗号，但此代码不起作用，我该怎么做？

Answer 1

请注意，“不工作”是一个无用的错误描述。
此外，R2:R100 不是指 R 列，而是指 R 列中的第 2 到 100 行，因此替换方法仅适用于 R 列中的第 2 到 100 行。因此，如果要将替换应用于整个 R 列，您需要使用 Range("R:R") 或 Columns("R") 。
此外，我强烈建议指定此范围或列在哪个工作表中。否则 Excel 猜测，它可能会猜测错误:ThisWorkbook.Worksheets("Sheet1").Range("R:R")…最后，您设置 LookAt:=xlWhole 这意味着 整个 单元格内容必须是逗号(其中没有其他内容)才能替换为空格 Replacement:=" " 。
查看 Range.Replace method 的文档，为 LookAt:= 参数 (XlLookAt enumeration) 选择正确的值。
请注意，此代码仍然没有删除逗号，而是将逗号替换为空格。要删除它，您必须将 Replacement:=" " 更改为 Replacement:="" 。