VBA Small Amendment

Hi Guys

Looking for some help
Please find attached two files Md-162 & copy of bin report
Copy Of the bin report references Md-161 , Md-162, Md-163
Currently The VBA Returns 10 characters in column B, Is it possible if this could be changed to return 39 characters.
I think the vba should be Cells(rowcounter, 2) = RTrim(Mid(filedata, 1, 39))

Why don't you try it...?