You don't need a macro to do any of that on a single document. In fact, it can all be done with two wildcard Find/Replace actions, where:
Find = ["“]*["”]
Replace = ^&
and you set the replacement font attributes to bold, and
Find = \(*\)
Replace = ^&
and you set the replacement font attributes to Times New Roman size 12. The macro recorder will record the essential details and, for a macro to do a Find/Replace on all documents in a selected folder, see:
https://www.msofficeforums.com/134542-post2.html