Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
788to792
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
788to792
788to792
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

chr$(13) unterdrücken

chr$(13) unterdrücken
15.08.2006 13:27:54
Juergen
Hallo Leute!
Ich habe in einer Datenbank Anschriften wie z.B. Mustermann CR bzw. ASCII13 Straße CR bzw ASCII13 usw.
Wenn ich jetzt diese Anschrift in ein Excelfeld einfüge kommt die Anschrift auch wunderbar untereinander jedoch immer am Ende dieses kleine Viereck.
Die Datenbank wird über ein Userform gefühlt wo im Textfeld der Return zulässig ist. Ich vermute mal das danach sowohl ein CR als auch in LF gespeichert wird. Aber wie unterdrücke ich nun im Excelfeld dieses kleine viereck..sodas nur der LF bzw. CR für die nächste zeile passiert. Wie gesagt die Zeilen sind unter einander.
Mit besten Dank im voraus.
Jürgen

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: chr$(13) unterdrücken
15.08.2006 14:08:51
u_
Hallo,
nach dem Muster
sheets(1).Range("A1")=replace(TextBox,chr(13),"")
Gruß
Lesen gefährdet die Dummheit
AW: chr$(13) unterdrücken
15.08.2006 14:10:23
Peter
Hallo Jürgen,
wenn dein Text (mit Chr(10) oder Chr(13) in A1 steht, dann so:
Range("A1").Value = Application.Substitute(Range("A1").Value, Chr(10), "")
Range("A1").Value = Application.Substitute(Range("A1").Value, Chr(13), "")
sonst muss du eben ein wenig anpassen.
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
AW: chr$(13) unterdrücken
15.08.2006 14:18:14
Juergen
Klasse...wusste doch das es eine einfache Lösung gibt.
DANKE!!!
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige