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

Moin zusammen,

Google bringt mich grade nicht entscheident weiter: Hat hier schonmal jemand einen Richtext-Feldinhalt samt Sonderzeichen (Smileys u.ä.) und - wichtiger noch - inklusive vorhandener Zeilenumbrüche als HTML-String exportiert, und kann mir ein paar Brocken zur Umsetzung hinwerfen?


Gruß und Danke!
Andre.

:)

 

Seit Acc2007 wird Richtext nicht mehr mit RTF-Tags umgesetzt, sondern mit HTML. Also könntest Du mal nachschauen, was bei einer gebundenen Textbox mit RTF-Format im Tabellenfeld steht.

 

einzelne Zeilen, wie im Textfeld eingegeben, getrennt per Zeilenumbruch. und eben diese zerhacken mir den Aufbau der CSV.

ich glaube aber, mit Code:

auf einem brauchbaren Weg zu sein.
(ich krieg das Zeilenumbruch-Tag hier grad nicht gescheit maskiert)

Wenn es bessere Wege gibt, bin ich aber weiterhin interessiert.

 

Smileys in eine CSV?
Anforderung oder Wunsch?

 

Sowohl als auch, mit Tendenz zur Vorgabe ;-)

Sind in bestimmten Texten vorhanden, und sollten wenn möglich beim CSV-Transfer in das Zielsystem übergeben werden / erhalten bleiben.

Letztlich werden sie als "aufgehübschte" Aufzählungszeichen benutzt, und sind bisher nur für die Darstellung von Artikel-Infos in Reports benutzt worden. Die CSV-Geschichte ergab sich erst im Nachhinein.

 

Ich häng mich nochmal an:

Ich habe jetzt mein Memofeld soweit um ungewollte Steuerzeichen bereinigt, Zeilenumbrüche in CVS-taugliche HTML-Tags umgewandelt, und muss nun "nur" noch ein vorhandenes Sonderzeichen umwandeln.

Vor dem Tag-Bereinigen per Plaintext() könnte ich das Zeichen als (Teil-)String

HTML:

"?"

identifizieren, es gelingt mir aber nicht, per

HTML:

Replace(strText, "?","-")

daraus bspw. einen einfachen Bindestrich zu machen. Ohne Maskierung der " gibts einen Syntaxerror, mit Maskierung "" passiert schlicht nichts.

Nach dem Bereinigen per Plaintext kriege ich aber das "?" ebensowenig ersetzt:
Code:

bringt keine Fehlermeldung, aber auch hier keine Ersetzung.

Warum werden Replace und ich heute keine Freunde? *wink.gif*

 

Hallo Andre,

versuch mal
Code:

 

Ändert leider nichts.

 

Code:

funktioniert bei mir einwandfrei...

Was enthält strText?

Auch mit dem obigen HTML-Text funktioniert es, wenn ich statt der " um die Schriftart ' verwende.
Ggf. musst Du diese durch Chr(34) absichern

Nachtrag: Geht mit chr(34)...

PHP:

         ?Replace("<font face=\" & chr(34) & "Segoe UI Symbol" & chr(34) & ">?</font>", "?", "!")


 

Hallo

ggf ist das ? kein ?(Fragezeichen) sondern die DarstellungsInterpretation eines WideString- oder UTF-Zeichens.

 

ok, ein paar mehr Infos, vielleicht überseh ich irgendwas.

Memofeld, Richtext, wird im Formular mit folgendem text gefüllt:

incl. der Formatierungen.

Mit folgender Funktion bringe ich diesen Text in eine CSV-taugliche Struktur, innerhalb eines umfassenderen CSV-Exports:

Code:

Ausgabe per Debug.Print eines Musterartikels:

, in der Ziel-CSV ist der Teil-String soweit auch korrekt:

([br] ist kein Tippfehler; die Maskierung im Editor macht mich grad ein wenig aggro *wink.gif* )



Ohne die Plaintext-Verarbeitung oben ergibt die Direktausgabe:

HTML:

[br]? Zeile 1
[br]
[br]? Zeile 2
[br]
[br]? Zeile 3

,

ich kann aber nicht per

PHP:

         strTEXT = Replace(strTEXT, "<font face=''Segoe UI Symbol''>?</font>", "!")


 

Gemäß Hinweis von daolix: Hast Du geprüft, ob Dein Smiley/Fragezeichen wirklich ein Fragezeichen (im normalen Font) ist?

Testweise könntest Du ASCII-Code von dem Zeichen und sicherheitshalber von der unmittelbaren Umgebung ausgeben lassen:
Code:

Man könnte schon, z.B. per RegEx alles erfassen, was folgendem Muster entspricht:

PHP:

         "<font.*?</font>"


 

Das sagt mir auf die Schnelle nichts.

Das "?" steht im Ausgabestring als 6. Zeichen, wenn ich den Hinweis richtig verstanden habe:

Debug.Print Asc(Mid(fctBESONDER, 6, 1)) ergibt "63", mit der Info kann ich aber nichts anfangen ...

 

63 ist die Nummer im Ascii-Code für das ? - s. Post #7. Damit ist sichergestellt, dass es ein ? und kein anders interpretiertes Zeichen ist. Dann sollte der Code von Benny doch aber funzen ...

 

Ich glaube aber, dass eure Stossrichtung stimmt:

Ich hab gerade gesehen, dass in der Tabelle, die die Daten des CSV-Exports temporär aufnimmt, NICHT der String "[br]? Zeile 1 [br]? Zeile 2 [br]? Zeile 3" gemäß debug.print-Anzeige steht, sondern "☺ Zeile 1 ☺ Zeile 2 ☺ Zeile 3".

Die CSV ist korrekt, vermutlich aber nur, weil die keinen "☺" kennt.