|
Hallo,
ich bin recht neu was das Thema VBA und Makros angeht doch habe ein konkretes Problem was das Erzeugen von text files aus Excel heraus angeht.
Derzeit schreibt ein Makro die Textfiles mit ANSI Codierung weg. Normal über den Weg OPEN-> PRINT -> CLOSE.
Zukünftig müssen die Textdateien aber in UTF-8 Codierung geschrieben werden. Soweit ich das herausgefunden habe, kann ich die Codierung nicht über den o.g. weg handhaben und hab es dazu mit ADOobj = CreateObject("ADODB.Stream") versucht. Funktioniert soweit auch, dass ich die Datei nun mit der UFT-8 Codierung erstellen kann. Nur leider habe ich beim Füllen mit Text das Problem, dass ich PRINT Statements wie:
Print #2, st_z; Tab(c); data
oder
Print #2, "+BV"; Spc(3); "$T38"
nicht nach ADOobj.WriteText konvertiert bekomme. Kann mir da jemand weiterhelfen, ob es möglich ist o.g. Textstrings über diesen Weg mit WriteText auszugeben? Oder Verrenne ich mich da gerade und es gibt einen anderen oder sogar einfacheren Weg, als über ADODB.Stream?
Danke vorab für die Hilfe!
Gruß Frank
|