【Excel VBA】指定の文字より左側または右側を取り出す

左側

Dim str As String
str = "hoge fuga"
str = Left(str, InStr(str, " ")-1)  'hoge

右側

Dim str As String
str = "hoge fuga"
str = Right(str, Len(str) - InStr(str, " "))  'fuga
スポンサーリンク