I am trying to import an Excel spreadsheet using TransferSpreadsheet. The strLastDataColumn field returns a special character instead of the alphabetic column name. When I try not using a range, I get a 3709 error. What could be the problem?

strLastDataColumn = Chr(Selection.SpecialCells(xlLastCell).Column)
strLastDataRow = Selection.SpecialCells(xlLastCell).Row
strLastDataCell = strLastDataColumn & strLastDataRow 'e.g. J123

strRange = "A1:" & strLastDataCell

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblExcelImport", strFilePath, True, _