【ExcelVBA】RegExpオブジェクトについてのお伺いです。

あ(5000)
いい(200)
ううう(3200)
123(4000)
ABCD(500)

こちらの(数字)部分だけを置換したいと思っております。

あ
いい
ううう
123
ABCD

------
Lastrow = Range("A65536").End(xlUp).Row
Set DRng = Range("E2:E" & Lastrow)

Set ReStr = New RegExp
ReStr.Global = True
ReStr.Pattern = "検索語"
For Each c In DRng
If Not TypeName(DRng) = "Range" Then Exit For
c.Value = ReStr.Replace(c.Value, "")
Next
-------
検索語にどのような正規表現を記述したらよいでしょうか？
なお、(数字)がないセルもあります。(数字)が入っているセルの値については(数字)で終わります。

よろしくお願いします。