Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
572to576
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
572to576
572to576
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilenumbrüche Alt Enter ersetzen

Zeilenumbrüche Alt Enter ersetzen
23.02.2005 11:43:46
Claus
Hallo zusammen,
eine Kollegin, die gerade an ihrer Diplomarbeit schafft, hat ein Problem. Ihr Freund empfahl ihr für den Zeilenumbruch innerhalb Zellen mit viel Text, mittels "Alt Enter" dies manuell zu setzen. Offenbar wusste er nicht, dass man das per Formatierung "Zeilenumbruch" bewerkstelligt.
Nun hat meine Kollegin natürlich das Probblem, dass bei Verbreiterung von Spalten diese mühsam eingepflegten Zeilenumbrüche sehr störend sind.
Deshalb Frage: Gibt es eine Möglichkeit, alle diese manuellen Zeilenumbrüche des gesamten Dokuments automatisch zu entfernen bzw. durch eine Leerstelle zu ersetzen?
Vielen Dank schonmal
Grüßle Claus

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenumbrüche Alt Enter ersetzen
bst
Mahlzeit Claus,
Option Explicit

Sub NoLF()
Cells.Replace Chr(10), " ", xlPart
End Sub

Gruß, Bernd
AW: Zeilenumbrüche Alt Enter ersetzen
23.02.2005 13:01:40
Claus
Hallo Bernd,
vielen Dank für die Antwort.
Ich glaube, das ist die Lösung meines Problems, doch weiß ich leider nicht, wo ich diesen Code eingeben muss, damit er auf die gesamte Datei mit allen Tabellen wirkt.
Zudem habe ich ein weiteres Problem entdeckt: Teilweise wurde der manuelle Zeilenwechsel vor einem Leerzeichen eingegeben und das Leerzeichen dann gelöscht (damit die Schrift nicht an zweiter Stelle beginnt), dann ist das Ersetzen von Chr(10) durch Leerstelle richtig.
Teilweise wurde der manuelle Zeilenwechsel aber auch nach dem Leerzeichen eingegeben. In diesem Falle müsste ich Chr(10) nur löschen, denn sonst habe ich doppelte Leerzeichen.
Sorry, dass ich jetzt durch unpräzise Fragenstellung noch mehr Aufwand erzeuge. Ich wäre sehr dankbar, wenn mir trotzdem weitergeholfen würde.
P.S. an Hübi: Vielen Dank auch für deine Lösung, da dieses Problem aber in verschiedenen Tabellen innerhalb etlicher Zellen vorkommt, wäre diese Lösung zu manuell.
Grüßle von Claus
Anzeige
AW: Zeilenumbrüche Alt Enter ersetzen
bst
Hi Claus,
Der Code funktioniert so nur auf dem aktiven Blatt.
Versuch's mal mit sowas. Sollte auch dein BLANK-LF Prob lösen.
cu, Bernd
--
Option Explicit

Sub NoLFAtAll()
Dim ws As Worksheet
' On Error Resume Next ' nur bei Bedarf, dann aber schaun warum
For Each ws In ActiveWorkbook.Worksheets
With ws.UsedRange
.Replace Chr(10), "__LF__", xlPart
.Replace " __LF__", " ", xlPart
.Replace "__LF__", " ", xlPart
End With
Next
End Sub

AW: Zeilenumbrüche Alt Enter ersetzen
23.02.2005 15:40:30
Claus
Hallo Bernd,
juppi, es klappt! Vielen herzlichen Dank hierfür.
No eine klitzekleine Frage: Dieses "Option Explicit" habe ich jetzt auch mit in den Quellcode genommen. (rechte Maustaste auf Tabellenreiter, code anzeigen, allgemein anklicken, dort hab ich deinen ganzen Code reinkopiert)
Hätte ich das müssen, und wenn ja, was bewirkt das? Die restliche Funktionsweise des Makros habe ich im schrittweisen ablaufen lassen nachvollzogen und verstanden, ist ja auch nicht schwierig - aber draufkommen muss man halt und wissen wie.
Also denne, ganz liebe Grüße aus dem Schwabenland
Claus
Anzeige
AW: Zeilenumbrüche Alt Enter ersetzen
bat
Abend Claus,
Bitteschön & freut mich wenn's geht.
Zu Option Explicit:
Hiermit erzwingst Du daß alle benutzen Variablen zuvor definiert werden.
Ansonsten erzeugt VBA einen Fehler.
Sieht auf den ersten Blick vielleicht ja noch dämlich aus:
wozu was tun daß überhaupt nicht sein muß ?
Wenn man's näher betrachtet wird's immer sinnvoller.
Undefinierte Variablen werden immer zu 'Variant' gemacht. Sie
- benötigen dabei (zumeist) mehr Speicher
- benötigen (zumeist) mehr Zeit wegen unnötigen Typkonvertierungen
Richtig dimensionierte Variablen dagegen erleichtern das Leben.
Syntaxfehler werden bereits frühzeitig erkannt d.h. sowas wie:
dim iRet as integer
iRet = iRte + 1
Oft können ungewollte Zuweisungen erkannt werden, wie in:
dim ws as WorkSheet
set ws = ActiveWorkBook
Du hast bei Objekten jeder Zeit die automatische Vervollständigung 'IntelliSense' zur Verfügung.
Mehr fällt mir momentan nicht ein ;-)
Gruß, von Schwabe zu Schwabe :-)
Bernd
Anzeige
AW: Zeilenumbrüche Alt Enter ersetzen
24.02.2005 17:43:38
Claus
Hallo Bernd,
die Bekannte, die an ihrer Diplomarbeit schreibt, ist ganz aus dem Häuschen. Sie ist ganz begeistert, dass das hier im Forum einfach so toll geklappt hat und bedankt sich ebenfalls recht herzlich.
Zum Thema "Option Explicit": Da denke ich genauso, dass es richtig ist, am Anfang minimal mehr Aufwand reinzustecken, um dann später ggf. einen gravierenden Fehler zu vermeiden. Wenn man das 100 mal quasi unnötig macht, aber beim 101. mal dadurch verhindert, dass man irgendwie falsch mit einer Variablen weiterrechnet, hat man insgesamt wahrscheinlich Zeit gespart, oder sogar einen Fehler im Endergebnis vermieden.
Das kann man sicher auf viele Tätigkeiten übertragen: Lieber am Anfang sauber und gründlich, dafür etwas langsamer, arbeiten, als hintenraus ewig Fehler zu beseitigen. Aber erklär das mal deinem Chef! (Meiner akzeptiert´s aber schon, da hab ich glaub echt Glück mit meinem Chef)
In diesem Sinne,
liebe Grüße
Claus
Anzeige
OT: Bitteschön und ebenfalls liebe Grüße
bst
.
AW: Zeilenumbrüche Alt Enter ersetzen
Hübi
Hi Claus,
das kann man so machen:
In eine Hilfsspalte diese Formel eingeben =WECHSELN(A1;ZEICHEN(10);" ") und nach unten ziehen. ZEICHEN(10) ist dieser Alt+Enter-Umbruch.
Danach bereinigte Texte kopieren und mit Bearbeiten - Inhalte einfügen... Werte über die Ursprungszellen einfügen.
Gruß Hübi
AW: Zeilenumbrüche Alt Enter ersetzen
23.02.2005 15:44:26
Claus
Hallo Hübi,
vielen Dank für die Antwort.
Allerdings hat mir Bernd eine umfassendere Lösung gezeigt. Deine Lösung hätte prinzipiell natürlich auch geklappt, aber da mein Problem in sehr vielen verschiedenen Tabellenblättern und dort in verschiedenen Zellen drinsteckt, habe ich nach einer automatischeren Lösung gesucht, so wie Bernd es mir gezeigt hat.
Liebe Grüße
Claus
Anzeige

235 Forumthreads zu ähnlichen Themen

3 Zellen zu 1ner 3-Zeiligen (wieAlt+Enter) machen
Horst_H

Hallo!
Meine Frage: In Spalte C steht eine Straßenbezeichnung, in Spalte H ein Kommentar und in Spalte I ein zweiter Kommentar. Nun möchte ich per VBA (weil ich viele Mappen unterschiedl. Länge und unterschiedlicher Stadtteile habe) erreichen, dass zusätzlich in die jeweilige Zelle in Spal...
11.08.2008 16:07:27
Thread-ID: 1000899
10 Beiträge
Anzeige
Was ist an diesem VBA-Code falsch?
Heiko31

Hallöchen,
ich möchte mit folgenden Code die Inhalte der Zeilen C122:C218 / M122:M218 / K122:K218 aus allen Arbeitsblättern in die Spalten B / C / D auf dem letzten Tabellenblatt übernehmen.
Die ersten beiden funktionieren wunderbar, aber die Auflistung aus K122:218 funktioniert gar nic...
23.11.2008 15:55:00
Thread-ID: 1027099
7 Beiträge
Was ist an diesem Makro falsch
jens-claus

Hallo Excelfreunde,
ich hatte nachstehendes Makro im Einsatz, dies lief auch fehlerfrei.
Doch jetzt stoppt das Makro bei: .HPageBreaks(i).Delete
Das Makro soll jeweils bei Wechsel in der Spalte G eine neue Seite ausdrucken.
Wer kann mir helfen?
Besten Dank im voraus.
S...
02.12.2008 16:11:00
Thread-ID: 1029548
3 Beiträge
Anzeige
Schaltfläche funktioniert bei Blattschutz nicht
manuela

hallo
möchte die daten aus einer sql-datenbank mittels makro aktualisieren. dazu hebe ich zuerst den blattschutz auf, aktualisiere und setze den blattschutz wieder. das makro läuft einwandfrei. sobald ich es aber mit einer userform auf dem blatt selbst verknüpfe, kriege ich eine fehlermeldu...
04.02.2009 11:12:30
Thread-ID: 1046940
5 Beiträge
Durchsuchen und in Zelle daneben ersetzen
Holger

Hallo,
irgendwie komme ich nicht weiter. Ich möchte mit einem Makro die Spalte "A1:A5000" nach der
Zeichenfolge "SV" durchsuchen und überall wo "SV" gefunden wird in der Zelle rechts daneben
(also in der gleiche Zeile in Spalte "B") das Datum "01.01.2008" eintragen.
Ein Ansat...
26.02.2009 12:25:07
Thread-ID: 1054317
4 Beiträge
Zeilenumbruch in Zelle mit Bezug
Ulf

Hallo Spezialisten,
wenn ich in einer Zelle einen Zeilenumbruch brauche geht das bekanntlich
mit ALT + ENTER.
Nun möchte ich diesen gleichen mehrzeiligen Text in einer zweiten Zelle
anzeigen. In dieser Zelle werden die Zeilenumbrüche nicht erkannt und
als kleine Kästche...
14.05.2009 10:00:45
Thread-ID: 1075028
5 Beiträge
Zeilenumbruch in Zelle mit Verkettungen
Rolf

Hallo!
ich möchte in eine Zelle folgendes schreiben: ="Text" & A1
Dann sollte aber der Text in der 1. Zeile stehen, der Rest in der 2. Zeile.
Alt-Return klappt leider nicht.
Kann mir jemand sagen, wie ich das hinkriege (ohne die Zelle entsprechend zu verkleinern)?
Danke<...
02.06.2009 09:48:33
Thread-ID: 1078547
6 Beiträge
Problem mit Zeilenumbruch in verbundenen Zellen
Christian

Hallo zusammen!
nachdem auf meinen letzten Beitrag leider keine Antworten eingegangen sind, habe ich nochmal selbst versucht, das Problem einzugrenzen.
Es ist nicht nur auf das Dokument beschränkt, mit dem ich Probleme hatte.
Man kann das Problem nachstellen:
Zellen A1 bis D30 v...
03.07.2009 22:42:59
Thread-ID: 1086260
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
9
3
6
2
8
4
3
4
5
2
6
4
3
8
2
2
4
10
17
11
13
7
4
9
11