Variable excel para ruta de archivo

[Pasote]

Pongo un repaso de lo que he hecho y las modificaciones sobre lo inicial......


la celda que escogí para introducir la variable fue : E33
En G33 propuse la ruta con expresión de la variable y funciona sin problema alguno.
Cada vez que modifico el valor en E33, automáticamente se afecta el valor en la ruta recogida en la celda G33.

El archivo de texto lo he ubicado en :
Y:\GABINETE\PROYECTOS\MODELOS\CONTROL\MiControl.tx t

Con el contenido 125.09

En la pestaña de la hoja donde he colocado la variable he introducido el código :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$E$33" Then Exit Sub

Open "Y:\GABINETE\PROYECTOS\MODELOS\CONTROL\MiControl.t xt" For Output As #1
Print #1, [e33]
Close #1
End Sub


Y en el editor de visual basic he creado la macro Auto_Open ()

Con este contenido :

Sub Auto_Open()
Open "Y:\GABINETE\PROYECTOS\MODELOS\CONTROL\MiControl.t xt" For Input As #1
Input #1, Linea
Close #1
[e33] = Linea
End Sub

Luego, sin cerrar la hoja me he puesto a modificar la variable 125.09

He puesto 126.09 y he observado que así queda reflejado en el archivo de texto, con la única peculiaridad carente de importancia de proponer un espacio al principio del archivo de texto y continuar con la variable.

Luego he procedido a cerrar la hoja.
A modificar el archivo de texto con 130.09
y volver a abrirla para observar el valor de la variable y de la ruta dentro de excel.

El resultado ha sido.....

130.09 € !!!!!!! . Jope.
Corrigo el formato de la celda y lo pongo en general y hago pruebas adicionales.
También el número 130.09 lo coloco rente (pegado al margen del archivo de texto, no dejo el espacio que constaté antes.....)

Sigo.

Hay un fallito que no se a que se debe.

Si pongo "130.09" luego aparece en el archivo de texto " 130,09"
y en la celda excel 130.09€

El punto del teclado numérico lo tengo como punto, no como coma....

El formato de celda donde introduzco la cadena 129.09 como general......

En otra de las ocasiones conteniendo el archivo de texto : " 131,09"
me aparece en la celda "131". No se. Debe ser un lío de puntos y comas....

Pruebo a poner en la celda E33 formato personalizado del tipo 000.00

Me sigue convirtiendo en una coma el punto que pongo en la celda excel. El punto de la celda excel se convierte en una coma en la variable almacenada en el archivo de texto....

Observo que el cambio se realiza incluso con el archivo de texto abierto. Y una observación más. Con el archivo abierto aparece 131.09 (con el punto) . En cambio si cierro el archivo y lo vuelvo a abrir, o simplemente no estaba previamente abierto , me aparece 131,09 (con la coma).