title: Excel VBA to find specific character in bold and replace with another character in bold
body: <p>thanks for your help. I need to find any occurrence of the charcter &quot;&amp;&quot; in bold text format and replace it with a comma in bold text format. I can't do find/replace because I only want to change the bold occurrences of the character. I thought I was getting close with the code below but I get a runtime error.</p>
  <pre><code>Sub ReplaceWord()
  
  Worksheets(&quot;Sheet1&quot;).Activate
  
  With ActiveDocument.Content.Find
   .ClearFormatting
   .Font.Bold = True
   With .Replacement
   .ClearFormatting
   .Font.Bold = True
   End With
   .Execute findText:=&quot;&amp;&quot;, ReplaceWith:=&quot;,&quot;, _
   Format:=True, Replace:=wdReplaceAll
  End With
  
  End Sub
  </code></pre>