Replace関数について

質問

Sub macro１()
Dim str As String
str = "abc"
str = Replace(str, "c", "a")
MsgBox str
End Sub

このマクロを実行した時に、問題なく動くのですが
なぜReplaceは関数なのに、
WorksheetFunction.がいらないのでしょうか？

しかも
Sub macro２()
Dim str As String
str = "abc"
str = WorksheetFunction.Replace(str, "c", "a")
MsgBox str
End Sub

にすると、エラーになります。

macro1のReplaceは、関数ではないのでしょうか？
メソッドやステートメントですか？

回答No.2

hatena1989 · ベストアンサー

> なぜReplaceは関数なのに、
> WorksheetFunction.がいらないのでしょうか？

Replaceはワークシート関数ではなく、VBA関数だからです。

str = Replace(str, "c", "a")

を省略せずに記述すると、

str = VBA.Replace(str, "c", "a")

となります。

ワークシート関数はExcelのセルの式で使用するための関数で、Excel専用の関数です。

VBA関数は、VBAが持っている関数で、Excel以外のOfficeアプリ（Word, Accessなど）でも使用できます。

お礼

ご回答ありがとうございました。

回答No.1

keithin

マクロ１で利用しているのは、エクセルＶＢＡで用意されているreplace関数です。

Ｆ１キーを押してヘルプを確認してみると（オブジェクトブラウザで確認するのもお勧め）
Replace(expression, find, replace[, start[, count[, compare]]])
という構文で利用すると説明があります。

マクロ２で利用しているのは、ワークシート関数のreplacです。
エクセル画面に戻り、関数ウィザードで関数のヘルプを確認してみると
REPLACE(文字列,開始位置,文字数,置換文字列)
のように使うと説明があります。
ついでにＶＢＡに戻ってworksheetfunctionのreplaceのヘルプを見てみると、関数じゃなくメソッドだと書かれています。

ワークシート関数の計算例：
=REPLACE("ABCDEFG",2,3,"Z")

ＶＢＡのreplace関数とは、全く構文が違いますね。
ＶＢＡからWorksheetFunctionのreplaceを利用する場合も、この書き順でこの内容で引数を与えないと、当然エラーになります。

ちなみにＶＢＡのreplace関数に相当するワークシート関数は、REPLACE関数じゃなくてSUBSTITUTE関数になります。

お礼

ご回答ありがとうございました。