¿¿Leer "rutas" desde un txt para luego utilizarlas??

[SicKo]

Buenas,

Queria saber si se podia hacer lo siguiente, y como.

Tengo guardadas unas rutas en un fichero de texto.
Lo que quiero hacer luego es utilizar esas rutas.

Son carpetas, y lo que quiero utilizar es un Folder.Copy (por ejemplo).

Pero no hay manera de que me lo acepte.

Esto es lo que probé:

Código:

Private Sub btncopy_Click()

Dim Cadena As String

Open "C:\temp\lista.txt" For Input As #1
Do While Not EOF(1) 
On Error Resume Next 
For Q = 0 To EOF(1) 

Line Input #1, Cadena
MkDir "C:\temp2"
Folder.Copy (Cadena), "C:\temp2"
Next Q
Loop
Close #1

End Sub

¿Me podeis ayudar?

[SicKo]

Ya lo he arreglado de otra manera, fue una tonteria, gracias.