Hooray!

but yes, I think it had to do with selecting the cells because this was the problem originally before you decided not to persue showing me TextToColumns

Set cz = Range("E2").End(xlDown)
SelectRange = cz
DataType = xlFixedWidth
FieldInfo = Array(Array(0, 9), Array(3, 3))
TrailingMinusNumbers = True

So multiple problems. The setup to select the cells and the way the statement was set up.

What say ye 'ol wise one? haha