VBA to remove unwanted numbers, parenthesis and trailing spaces in a range of multiple columns?

[VikingLink]

In the above example I have data in columns D through I which has numbers, parenthesis and trailing spaces. Can anyone help me with a code to remove all of this? I prefer to use a macro button for this.
I found this example, but that only works for one column, and I'm too much of a beginner to adapt it to work with this range.

 

[kweaver]

Here's one approach:

Sub MiscRepl()
  Dim i As Long, j As String
  junk = Array(")", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9")
  For c = 4 To 9
  For i = 2 To 5
  j = Cells(i, c)
    For Each a In junk
        j = Replace(j, a, "")
    Next a
  Cells(i, c) = Trim(j)
  Next i
 Next c
End Sub

 

[VikingLink]

Thank you so much! It works perfectly.