$selection->{'Find'}->{'Replacement'}->{'Font'}->{'Bold'} = 1
[download]

This should do it. You have been told in other posts how to go about finding solutions to MS Word related automation problems. I would also point out the Word Object Model Reference. For this case look at the Replacement object.