Respuesta :

A code example for a shape with no outline or one that its borders has been removed has been given below:

The Code

Dim rngShape As InlineShape

For Each rngShape In ActiveDocument.InlineShapes

   With rngShape.Range.Borders

       .OutsideLineStyle = wdLineStyleSingle

       .OutsideColorIndex = wdPink

      .OutsideLineWidth = wdLineWidth300pt

   End With

Next rngShape

Read more about shapes and borders here:

https://brainly.com/question/14400252

#SPJ1