（）内を置換し削除させるには？ (ID:125527)

名前

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

本文 整理してみました。 Text = "あいうえお（テスト）かきくけこ" とか Text = "abc(def(ghi)ikl(mno)pqr)stu" で Set Reg = CreateObject("VBScript.RegExp") Reg.Pattern = "\([^\(\)]*\)" Reg.Global = True While Reg.Test(Text) Text2 = Reg.Replace(Text,"") Text = Text2 Wend これでネストもOKかな