文字列取得

解決

琉球 2003-04-10 02:32:44 No: 106622

文字列の取得で教えて下さい。
○○○○(XXX)で文字があるとします。
(の先からXXXだけを取得したいのです。
○○○○の部分は文字によって長さが違います。
簡単な質問ですいませんが教えて下さい。

通りすがりの方 2003-04-10 03:44:30 No: 106623

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だけが入ると思います。

琉球 2003-04-10 04:00:27 No: 106624

通りすがりの方様ありがとうございます。
今、やってみたのですが
○○○○(XXX)の文字列で○○○○(XXX,YYY)という文字が入っていました。
そこで xxxだけで ,yyy以降は必要ないのですがどうしたら良いのでしょうか？

nanashi 2003-04-10 19:10:04 No: 106625

InStrを使えば出来ると思いますが。

１．カッコの中身を取り出す。
２．カンマがあったらカンマの前までを取り出す。

別に難しいことはないです。

ぢゃわ 2003-04-10 20:45:58 No: 106626

一度instr関数を調べてみてください。
区切り文字が変わっても、通りすがりの方さんの説明が
そのまま参考にできますよ。

あと、カンマがある場合とない場合があるようなので、
instr関数の結果が 0 になる場合は注意が必要だと思います。

"("から")"の間の文字を取得した後、","がなければそのまま
","があれば最初の","までを再度切り取る
という感じになると思います。
がんばってみてください。

琉球 2003-04-11 00:16:33 No: 106627

みなさんありがとうございました。
何とかうまく値が取れました。