Table Borders

[Gail]

Is there a way to not print the table borders in a
document - I have 200 documents using tables to lay the
document out efficiently but unfortunately didn't remove
the borders before creating them (they were created
initially using a mail merge).

To save having to remove the borders from all the files
can I just have a print event?

This is the one I have tried but it doesn't work and it
is only set to work on the first table in a document
anyway, I will have many tables- can anyone help please??
Thank you.

Gail

Private Sub appWord_DocumentBeforePrint(ByVal Doc As
Document, Cancel As Boolean)
Set myTable = ActiveDocument.Tables(1)

With myTable.Borders
.InsideLineStyle = wdLineStyleNone
.OutsideLineStyle = wdLineStyleNone
End With
End Sub

 

[Gail]

I found the answer - thought it might come in handy for
someone else

Sub TblBrdr()
For Each aTable In ActiveDocument.Tables
aTable.Borders.OutsideLineStyle = wdLineStyleNone
aTable.Borders.InsideLineStyle = wdLineStyleNone
Next aTable

End Sub