Microsoft Office Forums - View Single Post - [Solved] Programmatically make text box borders invisible

Daniel Antone · 12-30-2016, 03:50 AM

I am finding this is a real challenge.
This code supposes to set some properties of a text box. But Word sticks to the manually set defaults for auto shapes even if you try to change the defaults programmatically by using the property "SetShapesDefaultProperties"

Code:

  With Selection.ShapeRange(1)
    With .TextFrame
      .MarginLeft = 0
      .MarginRight = 0
      .MarginTop = 0
      .MarginBottom = 0
    End With
    .LockAnchor = False
    .WrapFormat.Type = wdWrapNone
    .Fill.Visible = msoFalse
    .Line.Visible = msoFalse
  End With

Any suggestions will be greatly appreciated.