You code works fine for me as-is. It can only affect a selected shape, not Word's defaults. However, if you insert:
.SetShapesDefaultProperties
after:
.Line.Visible = msoFalse
Your current configuration becomes the default for all autoshapes added to the current document (e.g. they get inserted with no border & 0-width margins).
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|