Try adding a line immediately after defining the strSQL string (just above the execute line) to print the string to the Immediate/Debug window.

Debug.Print strSQL
Does the code reside in a module...