I am reading in a txt file that looks like this:
33QNATPAUTO1021-02,yes
33QNATPAUTO1018-02,yes


When I run my code, the first column is coming only as 33,which I don' understand why it is doing it that way. I really don't want to split this in an array b/c that increases the complexity of what I am trying to achieve.

Help???
Thanks,
Nadia

Here's my code:
Dim sFile
Dim claimnumber, flag As String
Dim fileNum As Integer
fileNum = FreeFile


sFile = "O:\5 Prj Mgmt\QA Sys\AutomationTestScripts\ClaimsGUI\Files\QNA\cl.txt"
'Opens the input file and reads in the values
Open sFile For Input As #fileNum
Do While Not EOF(1)
Input #fileNum, claimnumber, flag
Debug.Print claimnumber, flag

Loop
Close #fileNum