Yep, that is the problem you're having and i just noticed that as well. I tried it and it worked perfectly. Change that line to this:
DoCmd.TransferSpreadsheet acImport, , "MyNewTable", "G:\DataFolder\DataFile1.xls", False, objSht.Name & "!c2:q17281"