App o Path

[byebye]

mete el codigo entre las etiquetas code.

[Bourne Ultimatum]

Listo lo logre!!!!
__________________________________

Código [Seleccionar] Expandir

Private Sub cmdguardar_Click()
Dim numero As String
Dim tt As String
tt = Text52.Text 'aca coloco la ruta q quiera
numero = tt & Ficha
On Error GoTo Fallo
Open numero For Input As #5
MsgBox "La ficha ya existe."___________________________________
Gracias a Los q me ayudaron la verdad q fue de gran utilidad este foro