Help, Remove all tables borders As of here, don't work

Cendrinne · #1 03-29-2023, 03:19 PM

I've tried to remove all the tables borders, as of this point with a range, and odd, It doesn't work.
I wish to keep the tables borders before my selection. I thought a selection of Tables range would only affect those table.

Anyway, here is my script, but it touches ALL TABLES

Here is the script I've created:

HTML Code:

    Dim xTbl As Table, oRng As Range
 
      Application.ScreenUpdating = False
    
        For Each xTbl In ActiveDocument.Range.Tables
           Set oRng = ActiveDocument.Range(Selection.Range.Start, ActiveDocument.Range.End)
     
    With xTbl.Borders

      xTbl.Borders.InsideLineStyle = wdLineStyleNone
      xTbl.Borders.OutsideLineStyle = wdLineStyleNone
    End With

    Next

  Application.ScreenUpdating = True

What am I doing wrong?
or it's not doable.

Please any insights would be greatly appreciated

C

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Help with Tables in All Headers in Every Section - Remove cell's padding	Cendrinne	Word VBA	6	03-06-2022 04:26 AM
Count numer of areas between boarders	tdody	Excel Programming	4	08-13-2015 01:02 PM
Does anyone know how to remove breaks between tables?	chrisd2000	Word Tables	18	07-02-2014 02:48 PM
How to remove background when copy and paste, no fill doesn't work.	mingo	Word	1	07-29-2010 02:25 PM
How to remove background in word. 'No Fill' does not work!	mingo	Word	0	07-27-2010 01:15 AM