Hi Paul ... great to hear from you.
Did I find the solution? It certainly isn't what you had suggested, but what I did seems to be working. Is it correct? Dunno. Could it cause, or be causing, other issues? Good chance LOL.
All I did was was put
Code:
Set objWord = CreateObject("Word.Application")
back in after the StrSQL = line.
??