Office: (Office 2003) Zeilenumbrüche entfernen

Guten Morgen,

ich habe eine Tabelle, wo ich gerne in einem Rutsch die Zeilenumbrüche entfernen möchte.

Folgende Updateanweisung funktioniert das zwar, es wird der Umbruch entfernt, aber anstelle dessen steht dort ein Zeichen, was ich nicht interpretieren kann.

Hier die Anweisung

Code:

Und so sieht es dann aus *eek.gif*



:)

 

Hi,

ist ein Zeilenumbruch nicht Chr(10) und Chr(13) in VBA ist es ja auch vbCrLf = Carrier return und Line feed. Falls du noch eine Schreibmaschine kennst. Vermutlich steht die Chr(13) dort noch.

 

Hallo,
ein kompletter Umbruch besteht aus 2 Zeichen Chr(10) und Chr(13), entferne also auch 13.

 

Hallo
möglich Das Du noch andere Zeichen auser Cr Lf (chr(13) chr(10) hast
oder Chr(13) und chr (10) einzel
also diese auch einzel weg machen musst.
evtl. auch noch chr(21) 'IBM-EBCDIC-Systeme
von wo sind die Daten von einem anderen System ?


----nachtrag----

Zeilenumbrüch Entfernen
In einer Abfrage
OhneZumb: Ersetzen(Ersetzen([tex];Zchn$(13);" ");Zchn$(10);" ")
Im SQL in
Replace(Replace([tex],Chr$(13)," "),Chr$(10)," ") AS OhneZumb

Oder wenn das Feld NULL (Leer) sein kann
Replace(Replace(nz([tex],""),Chr$(13),""),Chr$(10),"") AS Mleer
Replace(Replace("" & [tex],Chr$(13),""),Chr$(10),"") AS MxLeer

In VBA
StrDeinString =(Replace(DeinFeld,Chr$(13), " "), Chr$(10), " ")
StrDeinString =(Replace(DeinFeld, vbCr ," "), vbLf ," ")

StrDeinString =(Replace(nz(DeinFeld,””),Chr$(13), " "), Chr$(10), " ") ‘Wenn NULL möglich ist
StrDeinString =(Replace(““ & DeinFeld,Chr$(13), " "), Chr$(10), " ") ‘Wenn NULL möglich ist


Die VBA-Konstanten vbCr , vbLf , vbcrlf, vbNewLine
kann man aber in einer Abfrage / Sql und Dlookup nicht verwenden
da muss man Chr$(13) und Chr$(10) verwenden.

 

Hallo Gudula,

versuhe mal das: Code:

Anmerkung: Umlaute wie "Ä", "Ö", "Ü" in Spaltennamen bzw. Tabellennamen sind unglücklich! Besser ist "AE", "OE" oder "UE"!

Gruß

Markus

 

\@Stechi,
Deine Vorschlag löscht aber die ganze Überschrift und ersetzt diese durch ein Leerzeichen.

 

Hallo

also ich habe es mittlerweile mit chr(10) und chr(13) gelöst.
Das mit den Spaltennamen, das stimmt. Es ist allerdings eine alte Datenbank die ich übernommen habe. Dort sind so einige unglückliche Spaltenbezeichnungen eingebaut, so ganz einfach ist das nicht, die mal eben umzubenennen. *Smilie

Wenn ich neue Tabellen anlege, mache ich es selbstverständlich korrekt. *biggrin.gif*

Ich habe aber noch eine kurze Frage. Bevor ich die Replace-Lösung innerhalb der SQL eingesetzt habe, habe ich versucht, beim Endlosformular das Steuerelement direkt umzuwandeln, d.h., im Ausdrucksgenerator

= Replace([überschrift];vbcrlf;"")

Das funktionierte nicht. Wie kann man das denn machen?
Ich meine jetzt nicht einen Aufruf über ADO oder DAO sondern beim einfachen Access-Endlosformular.

 

Hallo

Versuche einmal

mit dem Addin Find and Replace kann man das leicht Korrigieren !! (Rick Fisher Consulting (Find and Replace for Microsoft Access))
für Access 97 - Access 2007erhältlich


-----

mit Chr(13) & Chr(10)
Die VBA-Konstanten vbCr , vbLf , vbcrlf, vbNewLine können NICHT überall verwendet werden !

oder z.B. so:
=Replace((Replace(““ & [UEberschrift],Chr$(13), " "), Chr$(10), " ")