SOLVED !
Search in the registry for correct application name. On windows 7 you
can find it in
“HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\RegisteredApplications”.
Then replace the new name in “Set wrd = GetObject(,
“Word.Application”)
Thanks to @pavanc
It was called Word.Application.16 instead of Word.Application
solved GetObject(, “Word.Application”) Office 365