使用Excel VBA进行字符串替换(类似于Excel SUBSTITUTE函数)

时间:2012-01-19 14:12:24

标签: excel-vba vba excel

我对字符串修改有疑问。我们假设我们有以下字符串:4155595208 ***
在单元格A1中(10个数字和3个开始)。

现在我想用空白字段替换这3颗星,并将结果输入单元格B1(所以我希望4155595208得到结果)。如果我使用普通的内置Excel函数,我会在单元格B1中键入以下内容:
= SUBSTITUTE(A1, “*”, “”)

现在我想使用Excel VBA做同样的事情。每当我尝试运行以下代码时,我收到错误消息:“运行时错误'13':类型不匹配”。

子测试()
cell(1,2)=“= SUBSTITUTE(M2,”*“,”“)”
结束子

我猜这个问题可能因为一堆引号而发生,但我不知道。有人可以帮我解决这个问题吗?

提前致谢,
的Laszlo

1 个答案:

答案 0 :(得分:1)

编写公式时需要使用双引号

Cells(1, 2) = "=SUBSTITUTE(M2,"" * "","""")"