I have no idea!!! Let's force it to select A11. Place this line of code:
Sheets("TnG-000").Range("A11").Select
above this line:
sDate = InputBox("Please enter the start date in format mm/dd/yyyy", "Enter Start Date", "mm/dd/yyyy")