File properties / GetDetailsOf stopped working. Bad MS update recently?

[jawaka]

Hi, my workbook have worked fine for a long time, suddenly my code can't read the proper file properties.

Using: Set objShell = CreateObject("Shell.Application") ...

Please Login or Register  to view this content.

This code runs and shows the name of the file, size and dates. But it does not show 'Comments' or any other file properties, like it used to do. And yes, I've checked that my files have comments
Anyone else getting this bug?

Edit, complete code:

Please Login or Register  to view this content.