使用Excel VBA進行字符串替換（與Excel SUBSTITUTE功能類似）

Question

我有關於字符串修改的問題。假設我們在單元格A1中有以下字符串：4155595208 ***
（10個數字和3個開始）。

現在我想用一個空白字段替換這3個星星，並在B1單元格中得到結果（所以我希望得到4155595208作爲結果）。如果我用一個正常的內置Excel函數我會鍵入以下事情到單元格B1：
= SUBSTITUTE（A1，「*」，「」）

現在我想這樣做使用Excel同樣的事情VBA。無論何時我試圖運行下面的代碼，但是我收到錯誤消息：「運行時錯誤'13'：類型不匹配」。

子試驗（）
細胞（1,2）= 「= SUBSTITUTE（M2，」 * 「 」「）」
端子

我想，因爲一串的可能發生的問題引號，但我不知道。有人可以幫我解決這個問題嗎？

由於提前，
拉茲洛

Answer 1

您需要使用雙雙引號寫公式

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