Macro now fails in Word 2013 after working for more than a year; still works in 2007

gmayor · #2 09-03-2015, 10:13 PM

Word 2013 ignores the username setting in Options, but you can work around it. Add the following loop where indicated by the existing code:

Code:

    If Val(Application.Version) > 14 Then
        Dim oComment As Comment
        For Each oComment In ActiveDocument.Comments
            oComment.Author = Application.UserName
        Next oComment
    End If
    Application.UserName = myUsername
    Application.UserInitials = myUserinitials

Note that this will change the author for ALL comments. If there are some you wish to retain, you need to include code in the loop to omit them.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
formula in excel 2007 works not in 2013	piper7971	Excel	10	07-06-2015 02:09 PM
2013 presentation's animation not working in 2007	captainship	PowerPoint	1	04-16-2015 09:35 AM
Macro fails to add image border in Word 2007	samhdc	Word	1	03-30-2012 04:56 AM
Search always fails in Word 2007	Sachelis	Word	2	01-28-2011 08:50 AM
Saving a Word 2007 document as a PDF fails	dcabrames	Word	20	01-21-2011 03:07 PM