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

名前

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

本文 Set Reg = CreateObject("VBScript.RegExp") Reg.Pattern = "\([^\(\)]*\)" Do Text2 = Reg.Replace(Text,"") If len(Text2) = Len(Text) Then Exit Do Text = Text2 Loop これで動作確認できました。 >とやってみたのですが、ユーザー定義型は定義されてませんと表示されちゃいます。どうすれば良いのでしょうか？ Set Regexp = New Regexp を Set Reg CreateObject("VBScript.RegExp") にしてみてください