How to create a list of authors

Peterson · #1 03-30-2020, 08:51 PM

What's the best way to gather a list of all authors in a document (e.g., just like Show Markup > View > Specific People)? Is there a collection of authors that I'm simply not finding? Before writing this question, I was going to put the first author name into a comma-delimited string, find the next author, see if it's in the string and add to it if not, etc., then put the authors into an array, but this seems clunky.

Also, no need to provide code - I'd actually like to write it, but I don't want to stumble through the process, only to discover later that I came up with something convoluted and complex simply because I was unaware of a more elegant method. What follows isn't really anything, just a start, before I thought to ask here:

Code:

Sub GetAllAuthors()

    Dim MyRevision As Revision
    Dim MyComment As Comment
    
    For Each MyRevision In ActiveDocument.Revisions
        Debug.Print MyRevision.Author
    Next
    
    For Each MyComment In ActiveDocument.Comments
        Debug.Print MyComment.Author
    Next
 End Sub

Thanks

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word 2013 Referencing - Citations with more than 3 authors	Cris4py	Word	5	01-05-2017 04:29 AM
Simultaneouly edit a document with other authors	jaypas	Word	5	08-22-2016 09:10 PM
Word for Independent Authors - formatting	Ray Bright	Word	3	06-09-2016 03:16 PM
Using track changes in MSWord, is it possible to have changes done by multiple authors come under th	rob1986	Word	1	02-26-2016 05:15 PM
How do you create a list similar to an itunes list?	hatemail13	Excel	1	08-06-2010 02:21 AM