replace tut nicht =(

[fredlllll]

Private Sub Text1_Change()
Dim var
var = Text1
Replace var, "\\", "\"
Text1 = var
File = Text1
End Sub

am ende steht im text1 aber noch immer ein \\ anstatt eines \
wieso da is doch alles richtig! was solln des? der is plöööt *Schmoll*

bitte hilfe danke

 

[Masterclavat]

Vielleicht...

var = Replace(var,"\\","\")

 

[fredlllll]

omg ich hab nerven was? sry XD omg bin ich e sry
hoffe sowas kommtnimmer vor =/