It looks like every set of numbers in parentheses that you need to delete begins with
ct., so you can delete those sets while leaving your totals with the following code:
Code:
Sub Test_Replace()
With ActiveDocument.Content.Find
.Text = "\(ct.*\)"
.Replacement.Text = ""
.ClearFormatting
.Replacement.ClearFormatting
.MatchWildcards = True
.Execute Replace:=wdReplaceAll
End With
End Sub