RTF in einer Excel Spalte umformatieren
Hallo zusammen,
ich bekomme von meinem ERP System eine CSV Datei mit allen Werten die ich brauche. Jetzt muss ich diese Werte in Excel importieren und dann etwas verarbeiten. Unteranderem ist dabei auch eine Spalte mit einer Beschreibung des Artikels dabei. Diese ist im RTF Format mit sämmtlichen Formatierungen. Ich brauche aber eigentlich nur den Text bzw. wäre mit auch eine HTML Ansicht sehr lieb. Kann mir jemand helfen wie ich das umformatieren kann?
Danke für eure Hilfe
VG Charly
ich bekomme von meinem ERP System eine CSV Datei mit allen Werten die ich brauche. Jetzt muss ich diese Werte in Excel importieren und dann etwas verarbeiten. Unteranderem ist dabei auch eine Spalte mit einer Beschreibung des Artikels dabei. Diese ist im RTF Format mit sämmtlichen Formatierungen. Ich brauche aber eigentlich nur den Text bzw. wäre mit auch eine HTML Ansicht sehr lieb. Kann mir jemand helfen wie ich das umformatieren kann?
Danke für eure Hilfe
VG Charly
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 219258
Url: https://administrator.de/contentid/219258
Ausgedruckt am: 24.11.2024 um 04:11 Uhr
7 Kommentare
Neuester Kommentar
Schau dir mal den Link an:
http://www.solvatec.com/index.php/programmierung/247-rtf-in-text-umwand ...
Ich denke da sollte es möglich sein sich was zu basteln in VBA.
Gruß
Xolger
http://www.solvatec.com/index.php/programmierung/247-rtf-in-text-umwand ...
Ich denke da sollte es möglich sein sich was zu basteln in VBA.
Gruß
Xolger
Hallo Charly,
1.) http://www.lebans.com/DownloadFiles/May23-2004OCXonly.zip
von http://www.lebans.com/richtext.htm
herunterladen, entpacken, Setup ausführen.
2.) Excel starten
3.) VBA in Excel starten
4.) Extras -> Verweise -> RTF2 ActiveX Control module einbinden (Haken setzen)
5.) Ein UserForm einfügen (frm_RTF_Form) und das RTF2 darauf platzieren
6.) ein Modul einfügen und folgenden Code eingeben:
7.) Sub RTF2Plain () an die eigenen Bedürfnisse anpassen.
Schleifen etc. in der notwendigen Spalte.
Viel Spaß dabei.
Gruß
Xolger
1.) http://www.lebans.com/DownloadFiles/May23-2004OCXonly.zip
von http://www.lebans.com/richtext.htm
herunterladen, entpacken, Setup ausführen.
2.) Excel starten
3.) VBA in Excel starten
4.) Extras -> Verweise -> RTF2 ActiveX Control module einbinden (Haken setzen)
5.) Ein UserForm einfügen (frm_RTF_Form) und das RTF2 darauf platzieren
6.) ein Modul einfügen und folgenden Code eingeben:
Public Function Rtf2Text(ByVal vRtfText As Variant) As Variant
If Not IsNull(vRtfText) Then
frm_RTF_Form.RTF21.RTFtext = vRtfText
Rtf2Text = frm_RTF_Form.RTF21.PlainText
Else
Rtf2Text = Null
End If
End Function
Sub RTF2Plain()
a = Cells(1, 1)
Cells(1, 1) = Rtf2Text(a)
End Sub
7.) Sub RTF2Plain () an die eigenen Bedürfnisse anpassen.
Schleifen etc. in der notwendigen Spalte.
Viel Spaß dabei.
Gruß
Xolger
Hallo Charly,
ich habe das Setup unter Windows 7 x64 und 8 x64 ausgeführt und keine Probleme gehabt.
Hast du ggf. mal rechte Maustaste und "Als Administrator ausführen" versucht, vielleicht klappt es da.
Bzw. kommt denn wenigstens die Benutzerkonensteuerung und fragt ob das Setup ausgeführt werden soll?
Gruß
Xolger
ich habe das Setup unter Windows 7 x64 und 8 x64 ausgeführt und keine Probleme gehabt.
Hast du ggf. mal rechte Maustaste und "Als Administrator ausführen" versucht, vielleicht klappt es da.
Bzw. kommt denn wenigstens die Benutzerkonensteuerung und fragt ob das Setup ausgeführt werden soll?
Gruß
Xolger