マクロのInstr()などでスペースが半角全角不明の時は？

InstrやRight関数で文字列変数内のスペースを取得するとき、半角全角どちらでもOKにするにはどう記述しますか？
Instr(myStr," " Or "　")はエラーになります。

No.1 ベストアンサー 回答者： mshr1962 回答日時： 2008/02/01 22:42

StrConv()で事前に文字全体を半角か全角に置き換える。

Instr(StrConv(myStr,VbNarrow)," ")
Instr(StrConv(myStr,VbWide),"　")

Replace()で事前にスペースのみを半角か全角に置き換える。
Instr(Replace(myStr,"　"," ")," ")
Instr(Replace(myStr," ","　"),"　")

この回答へのお礼

ありがとうございます。
Replaceで置き換えます。

お礼日時：2008/02/01 23:01

No.2 回答者： merlionXX 回答日時： 2008/02/01 22:50

Instr(myStr," " Or "　")という書き方はできません。

Sub test01()
myStr = "abc　d"
MsgBox InStr(StrConv(myStr, vbNarrow), " ")
End Sub

こんな感じでしょうか。

この回答へのお礼

一度変換する必要があるみたいです。
ありがとうございました。

お礼日時：2008/02/01 23:02