Office: (Office 2010) Rich-Text-Memofeld als HTML-String ausgeben.

Widestringzeichen (und vba und Access verwenden Widestring) werden bei Zeichen ausserhalb vom Asciisatz im Direktfenster immer mit ? angezeigt. leite die Aussgabe deines replacten Textes mal in eine Accesstextbox um. evtl wird der Text dort etwas anders angezeigt.

 

Vielleicht mal ganz anders: Kannst Du den ursprünglichen Text mit Überschriften und allen Tags als Textdatei bereitstellen sowie eine Darstellung des gewünschten Endzustands? Ggf. könnte man Zeile1, Zeile2, ... direkt per RegEx auslösen und wie gewünscht mit Ausrufezeichen (oder anderen Trenner) ausgeben lassen. Da müsste man aber auch berücksichtigen, ob und wie dann noch andere Elemente/Zeilen auftreten.

 

\@daolix: Ja, das "?" ist offenbar ein Holzweg.

die Ausgabe in ein Textfeld bspw. ergibt auch

Code:

Ich kann nichtmal per

Code:

die geschriebene CSV durchlaufen und das "?" entfernen; auch dabei bleibt das "?" stehen. aus "[br]?" wird nicht wie erwartet "[br]-", sondern "[br]- ?".

Per Editor Suchen und Ersetzen hingegen funktioniert wie erwartet.

Ich gestehe, das geht über mein Verständnis hinaus.



@Eberhard: Ich kann derzeit nur erahnen, was du meinst (RegEx bisher nicht benutzt), glaube aber, das geht übers Ziel, was Aufwand und Nutzen angeht. Das Problemfeld hier ist eines von 146 Feldern, die "nach CSV müssen".

Der Smiley ist recht verbreitet, aber nicht das einzige Sonderzeichen; es ist auch nicht sicher gestellt, dass damit immer der Beginn einer Aufzählungs-Zeile im Memofeld dargestellt wird.

Ich dachte ich käme mit einer simplen Replace-Aktion da ran, und hätte nur irgendwo Tomaten auf den Augen ...


Ich mach hier erstmal einen Cut und kläre mit den Benutzern / dem Kunden, was für Optionen noch im Raum stehen.

Danke euch für's Mitdenken!

 

Na du must halt zum replacen des smilies den entsprechenden WideChar verwenden. ggf so:
DeinText = Replace(DeinTextmitSmilie, ChrW(9786), "-") wenn dieses zeichen so in deinem urspungstext verwendet wird.

 

So ähnlich war ja mein erster gedanke, und daraus resultierren die (erfolglosen) Replace-Verrenkungen des gesamten HTML-Tags.

Wie bekomm ich denn den Widechar des Smileys heraus?

Ich kann anhand des HTML-Geraffels nur erkennen, um welche Schrift und welches Zeichen es sich handelt, das Ding selber ist vermutlich per Copy & Paste in die Felder gelangt.

 

ggf. ähnlich wie von Eberhard schon gezeigt, nur unterverwendung der W-Variante:
Debug.Print AscW(Mid(strText, x, 1))

 

Bingo!

Mir geht zwar die Komplexität des "Problem-Zeichens" noch nicht ganz in die Birne, aber das Problem ist gelöst, draussen is' dunkel ... Haken dran.

Danke nochmal allen Mit-Rätselnden!

*wink.gif*