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

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

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