wordのvbaのfind文について

Question

前提・実現したいこと

ワードの文で[0001]や[0002]等の[xxxx]を削除するVBAを作成したいと思っています。

res = .Find.Execute(FindText:="[[０-９]{4,}]")

と、記載しても[]が記号とみなされ、上手く検索してくれません。
どのようにしたらいいか、わかりますでしょうか？

エラーメッセージ

実行時エラー'5590'
[検索する文字列]に指定した範囲が正しくありません。

該当のソースコード

VBA
res = .Find.Execute(FindText:="[[０-９]{4,}]")

Answer 1

VBA詳しくないのでメソッドの使い方がよくわかりませんが、正規表現の部分を直してみました。これでどうでしょうか？

res = .Find.Execute(FindText:="[[0-9]{4,}]")

Comments

[nanashi1111]

ありがとうございます！解決しました！