"Gänsefüßchen" Problem im VBA
13.05.2017 12:39:19
Jürgen
ich habe hier ein eigenartiges Phänomen, welches beim automatisierten Import von Textdateien einhergeht.
Meine Beispieldatei enthält eine VBA Funktion, welche per Button Klick aus einem definierten Verzeichnis alle Textdateien einliest. Der Code funktioniert auch soweit einwandfrei (alles nicht auf meiner Feder, war Hilfe aus dem Forum).
Jetzt gibts die Eigenart, dass wenn Text oder Wörter in "...." gesetzt eingelesen werden, dies mit Sonderzeichen getauscht wird.
Beispiel:
So wurde der Text im Beispiel aus der Textdatei "Praat" in âPRAATâ importiert
(kann man mit dem Textfilter enthält PRAAT nachvollziehen).
Wenn man im Beispiel dagegen mit dem Textfilter enthält "glaub i net" sucht, sieht man, das das richtig importiert wurde!? Dies wird dann auch richtig angezeigt in beiden Gänsefüßchen. Das eigenartige ist, dass dies nur vereinzelt ab und zu so gemacht wird. Über weite Strecken wird der Text also richtig aus den " " importiert. Wenn ich aber den "falschen" Text in der Textdatei dann aber wieder neu schreibe, klappst das nächste mal. Dagegen klemmt's dann irgendwo wieder bei einem anderen Textteil mit dem " ".
Soweit ich weiss, wurde im VBA Code damals eine kleine Krux eingefügt (Function tausch() ) , welches Sonderzeichen und Umlaute passend korrigieren sollte beim Import. Könnte das damit zusammenhängen?
Nachdem ich fast null Ahnung von VBA habe hoffe ich auf Hilfe dabei.
Könnte sich ein VBA Fuchs mal den Code ansehen, ob das der richtige Ansatz wäre den Umstand zu beheben?
mein Beispiel...
https://www.herber.de/bbs/user/113552.xlsm
Vielen Dank im Voraus!
Gruss, Juergen