Please tell me it doesn't take 7 statements to turn table borders off

Jennifer Murphy · #1 01-29-2012, 05:41 PM

That's pretty clever. I never would have thought of that.

So I take it there is no wdBordersAll or something like that, right?

macropod · #2 01-29-2012, 05:56 PM

Quote:

Originally Posted by Jennifer Murphy

So I take it there is no wdBordersAll or something like that, right?

You could use something like:
ActiveDocument.Tables(1).Rows(1).Borders.Enable = False
but that would remove the bottom border from the row as well. You might remedy that with code like:

Code:

With ActiveDocument.Tables(1)
  .Rows(1).Borders.Enable = False
  .Rows(2).Borders.Enable = True
End With

sydneytroz · #3 07-25-2012, 08:13 AM

Quote:

Originally Posted by Jennifer Murphy

So I take it there is no wdBordersAll or something like that, right?

Since the border styles are stored in an array or some sort of indexed list, it looks like the other wd* variables are just indices, so a wdBordersAll wouldn't make sense.

If VBA was kept up with the .NET languages, you could do something like (I'm not familiar with VB .NET, so this is borrowing from the C# syntax)

Code:

Selection.Borders.ForEach(x => x.LineStyle = wdLineStyleNone)

...but that will probably never happen.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
showing results of If statements in a mail merge	m&co	Mail Merge	3	01-06-2012 07:27 PM
Word VBA: add borders to active table	tinfanide	Word VBA	2	12-02-2011 05:53 AM
Insert table button doesn't work in Outlook 2010 e-mail message	ironwoods	Outlook	0	08-02-2010 12:24 PM
Converting document to PDF but table of contents doesn't work	luthers	Word	0	07-30-2009 03:29 PM
IF statements that shifts to right.	kent	Excel	0	01-19-2006 02:23 PM