Well working simple macro now not working-open folder

I have similar macros in both Word and Excel. Their purpose is to open the folder the currently active document is in. We've recently switched from a Desktop to a Laptop, so I'm going through and testing things, and I've found that this one doesn't work correctly now in Word, but works fine in Excel. For Excel it opens the folder the WB is in, but for Word it opens the "My Documents" folder. I'm stumped as to why. Any ideas?

BTW, if I Debug.print ActiveDocument.Path it prints out
"H:\How to\Excel\Workbooks, Worksheets, Ranges", but the OpenFolder macro opens "My Documents"

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Maybe comment out the error trap and see how it fails, assuming it fails.
.

It didn't error, just opened the wrong folder again. I've noticed that this failure isn't total. "Some" documents (.DOCX) the macro works on, "some" it doesn't. Trying to see if I can spot a difference. For instance, two .DOCX documents in the same folder. If I have one of them open, the macro works fine. If instead I have the other open, it doesn't. Crazy!

Perhaps you should use ThisWorkbook and ThisDocument rather than ActiveWorkbook and ActiveDocument.

The macro doesn't exist in the workbook, it's for global use. So for Excel it's in my Personal, for Word it's in my Normal.

Your Word macro works fine for me. Perhaps you were testing it with an unsaved document?

Perhaps, but no. When I originally noticed the problem I had just created a document ("Range_Last Row.docx") and saved it, then tried to use my macro to open the folder it was in and landed on "MyDocuments". I tried a few other DOCXs in various folders, and on about half the macro worked fine, on the rest it opened "MyDocuments". Just now I reopened "Range_Last Row.docx", and again the macro defaulted to "MyDocuments".