Adding List Number to Acronym Table

gmaxey · #1 12-03-2016, 07:39 AM

Code:

While .Execute
            oCol.Add oRng.Text
            oColTxt.Add oRng.Sentences(1).Text
            oColLN.Add oRng.Paragraphs(1).Range.ListFormat.ListString
            oColPN.Add oRng.Information(wdActiveEndPageNumber)
            oRng.Collapse wdCollapseEnd
        Wend
    End With

SerenityNetworks · #2 12-03-2016, 09:12 AM

Thanks, but this only gets the list number when the acronym is part of the list bullet. I also need it to capture the list number for acronyms that fall under the list.

From your code, it only returns:
SGW 1 1.2.2 Syzygy Goes Wild (SGW)

I need to have returned:
RO 1 1.1 RO Real Options
BOB 1 1.2.1 BOB Big Ol' Bill
SGW 1 1.2.2 Syzygy Goes Wild (SGW)

Thanks again,
Andrew

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
adding tables based on a number given in a form	coba	Word VBA	5	12-26-2015 07:05 PM
Acronym Finder	Cray_Z	Word VBA	14	09-22-2014 11:42 PM
How to create a table with a number of line depending a number entered by user	Cellendhyll	Word Tables	3	07-10-2014 05:49 AM
List Style Numbering picks up out of order number from LATER list	spthomas	Word	12	12-16-2013 05:23 PM
Adding Characters to Page Number	Daved2424	Word	6	01-22-2011 07:11 PM