Macro to add border to text box in word