Application.Run strQueryToRun '"'" & ActiveWorkbook.Name & "'!GetQuery"

is there a ' in this line? it shows an error on this line