How to copy rows to new worksheet based on unique first character in column

Hello, I am trying to create a macro to copy rows from a data file into separate worksheets based on the unique first character of cell entries for a particular column in the data file.

I read previous posts for copying rows to a new worksheet but the column that is being evaluated to determine the name of the new spreadsheet should only have the first character evaluated, not the entire cell.

Any suggestions?
I will try to attach a file showing the raw data in the first sheet with the intended output in additional sheets.

2013-03-11 - Copy.xls