Dieses Sonderzeichen kam durch eine Userform hinein, in dem sich ein mehrzeiliges Textfeld befindet
und auf dem über Alt-Return ein Zeilenumbruch vorgenommen wurde.
Danke für jede Antwort.
ciao
Klaus
<KlausMich...@martingmbh.de> schrieb:
> wie kann ich Sonderzeichen z.B. Zeilenvorschub aus dem Text einer Zelle wieder eliminieren.
>
> Dieses Sonderzeichen kam durch eine Userform hinein, in dem sich ein mehrzeiliges Textfeld befindet
> und auf dem über Alt-Return ein Zeilenumbruch vorgenommen wurde.
verwende auf dem Tabellenblatt in einer Hilfsspalte die Funktion SÄUBERN().
Du könntest auch schon beim Übertrag von der UserForm
in eine Zelle die nicht druckbaren Sonderzeichen entfernen :
Range("A1").Value = Application.Clean(TextBox1.Text)
Mit freundlichen Grüssen
Melanie Breden
--
- Microsoft MVP für Excel -
Microsoft Excel - Die ExpertenTipps http://tinyurl.com/cmned
Das Excel-VBA Codebook http://excel.codebooks.de
Excel-Auftragsprogrammierung
Damit sind jedoch in der Zelle sämtliche Zeilenvorschübe weg. Das will ich nicht, ich will
nach dem Übertrag vom Userform.Text in eine Tabellenzelle den Zeilenvorschub (angezeigt
als kleines quadratisches Kästchen) nur nicht sehen!
Danke für Deine Bemühungen.
ciao
Klaus
<KlausMich...@martingmbh.de> schrieb:
> Damit sind jedoch in der Zelle sämtliche Zeilenvorschübe weg. Das will ich nicht, ich will
> nach dem Übertrag vom Userform.Text in eine Tabellenzelle den Zeilenvorschub (angezeigt
> als kleines quadratisches Kästchen) nur nicht sehen!
das ist eine Einstellung der Textsteuerung.
Aktiviere im Menü 'Format/Zellen' Register 'Ausrichtung'
das Kontrollkästchen vor 'Zeilenumbruch'
Ich benutze Excel 2003 SP1.
Vielen Dank für Deine Hilfe.
ciao
Klaus
>>> Melanie Breden<m.br...@usenet.arcornews.de> 28.07.05 16:47 >>>
<KlausMich...@martingmbh.de> schrieb im Newsbeitrag
news:42e9d7c3$0$27149$4d4e...@read.news.de.uu.net...
> Sorry, ich weiß wirklich nicht welches Kontrollkästchen Du
> meinst. Der Teil "Textsteuerung" beginnt mit Zeilenumbruch,
genau davon hat Melanie gesprochen:
aktiviere das Kontrollkästchen vor 'Zeilenumbruch'
--
Viele Grüße
Lisa
MS MVP Word
Microsoft Excel - Die Expertentipps
http://tinyurl.com/cmned und http://tinyurl.com/9ov3l
Ich glaube es ist am besten, wenn ich Dir Mal eine Datei sende, damit
Du siehst was ich meine. Ich schick sie Dir an wilke-...@web.de
Danke für Deine Bemühungen.
Klaus
>>> Lisa Wilke-Thissen<wilke-...@web.de> 29.07.05 09:27:57 >>>
Newsbeitrag news:42f20f1d$0$7308$4d4e...@read.news.de.uu.net...
> Zeilenumbruch kann es nicht sein, das hatte ich bereits schon
> aktiviert.
>
> Ich glaube es ist am besten, wenn ich Dir Mal eine Datei sende, damit
> Du siehst was ich meine. Ich schick sie Dir an wilke-...@web.de
okay, dann schick sie mal zu.
<Newsbeitrag news:42f20f1d$0$7308$4d4e...@read.news.de.uu.net...
> Zeilenumbruch kann es nicht sein, das hatte ich bereits schon
> aktiviert.
deine Zelle enthält sowohl das "Kästchen"-Symbol als auch danach einen
(funktionierenden) Zeilenumbruch. Mit folgender Formel kannst du das
Kästchen entfernen: =WECHSELN(A1;ZEICHEN(13);"")
Du müssest also Hilfszellen mit dieser Formel erstellen und mit dem
Ergebnis dann per "Bearbeiten/ Inhalte einfügen/ Werte" das Original
überschreiben, anschließend die Hilfszellen wieder löschen.
Schneller geht es per Makro, das ich per Google fand (von Martin Worm)
und leicht modifiziert habe:
Sub SymboleEntfernen()
Dim Txt As String, Zelle As Excel.Range
For Each Zelle In Selection.Cells
Txt = Zelle.Value
Txt = Application.WorksheetFunction.Substitute(Txt, Chr(13), "")
Zelle.Value = Txt
Next Zelle
End Sub
Das sind Lösungen für die Nach-Arbeit. Sinnvoller wäre wohl, die
Sonderzeichen zu vermeiden. Inwieweit das in der UserForm möglich ist,
kann ich nicht sagen :-(