Gracias por vuestras respuesta.
 
El For está ahí porque soy novato y los bucles en si no se me dan muy bien xD, de hecho la verdad es que este es el primero que hago. 
La cosa está en que necesitaba aumentar la variable numero en 1 con cada línea y pensaba que con esto se hacía con FOR... 
Al final basándome en la respuesta de "Drako_18" lo he conseguido de la siguiente forma  
Código:
 Dim numero As Integer = 2
            While Not fileReader.EndOfStream
                lineRead = fileReader.ReadLine()
                cadena1 = lineRead.Substring(0, 11)
                oSheet.Range(A & numero).Value = cadena1
                cadena2 = lineRead.Substring(11, 11)
                oSheet.Range(B & numero).Value = cadena2
                cadena3 = lineRead.Substring(22, 5)
                oSheet.Range(C & numero).Value = cadena3
                cadena4 = lineRead.Substring(27, 40)
                numero = numero + 1
            End While
  Con esto el programa hace exactamente lo que necesito. 
Un saludo