文字列取得 (ID:106623)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 dim aaa As string dim bbb As string dim i As long aaa="○○○○(XXX)" i=inStr(1,aaa,"(")+1 aaa=mid(aaa,i) i=inStr(1,aaa,")")-1 bbb=left(aaa,i) これでbbbにXXXだけが入ると思います。