Error when calling access query and passing date in parameters

Question

I am trying to call a query I have in an Ms Access DB but I\'m getting a Runtime error on sheetLoad.Range(drow & input_row).CopyFromRecordset pq1 which with