Macro to highlight alternating sections of a table

Jennifer Murphy · #1 02-22-2020, 08:04 AM

It just occurred to me that there would be no need to pass a parameter to declare the number of header rows if the macro could test for it. After a little research, I came up with this code, which seems to work:

Code:

Dim Row as long
With Selection.Tables(1)              
  'Skip over any header rows
  For Row = 1 To .Rows.Count
    If .Rows(Row).HeadingFormat <> -1 Then
      Exit For
  Next Row

Are there any problems with this code or is there a better way?

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro to highlight a list of words	bakerkr	Word VBA	4	10-19-2017 02:23 PM
Word 2010 VBA Print Macro - Specified Sections	Benbon	Word VBA	3	03-30-2017 02:31 PM
Macro Question: Need help making a macro to highlight the first word in every sentence	LadyAna	Word	1	12-06-2014 10:39 PM
Macro to highlight words	bertietheblue	Word VBA	9	07-01-2013 12:39 PM
find - reading highlight - highlight all / highlight doesn't stick when saved	bobk544	Word	3	04-15-2009 03:31 PM