Dimension macro

I'm looking for a macro to change the default text on a dimension to a different text.

My idea:

On a drawing

Hit "smart Dimension" and place dimension on the side of part

Hit the Marco

The Marco would charge the text from the default to "Arial Black"

End

Thanks for any help!!!!