Direkt zum Inhalt

Wie kann man Zeilenumbrüche in Excel schnell entfernen?

Manchmal, wenn Sie einige Daten von der Website kopieren oder Ihre Werte mit trennen Alt + Enter Tasten erhalten Sie einige Zeilenumbrüche oder Zeilenumbrüche. Wenn Sie mehrere Zeilenumbrüche in Excel wie in den folgenden Screenshots schnell entfernen möchten, können Sie dies wie folgt tun:

doc-remove-line-break1 -2 doc-remove-line-break2

Entfernen Sie mehrere Zeilenumbrüche mit der Funktion Suchen und Ersetzen

Entfernen Sie mehrere Zeilenumbrüche mit VBA-Code

Entfernen Sie mehrere Zeilenumbrüche mit Kutools for Excel


Pfeil blau rechte Blase Entfernen Sie mehrere Zeilenumbrüche mit der Funktion Suchen und Ersetzen

Mit der Funktion Suchen und Ersetzen in Excel können Sie mehrere Zeilenumbrüche schnell entfernen. Bitte verarbeiten Sie sie wie folgt:

1. Wählen Sie den Bereich aus, in dem Sie mehrere Zeilenumbrüche entfernen möchten.

2. Klicken Sie Startseite > Ersatz finden > Ersetzen oder klicken Sie auf Strg + F Verknüpfungen und a Suchen und Ersetzen Das Dialogfeld wird ausgeblendet.

3. Dann in der Finden Sie, was Box, bitte halten Sie die ALT Taste und dann auf Zahlen klicken 010 von der numerischen Tastatur. Lassen Sie die Ersetzen durch Feld leer oder geben Sie eine Leertaste ein. Siehe Screenshot:

doc-remove-line-break3

4. Und dann klick Alle ersetzen Schaltfläche wurden alle Zeilenumbrüche entfernt. Siehe Screenshot:

doc-remove-line-break2


Pfeil blau rechte Blase Entfernen Sie mehrere Zeilenumbrüche mit VBA-Code

Der folgende VBA-Code kann Ihnen auch dabei helfen, alle Zeilenumbrüche in einem Arbeitsblatt zu löschen. Bitte machen Sie Folgendes:

1. Klicken Sie Entwickler:in / Unternehmen > Visual Basic oder drücken Sie Alt + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Anwendungsfenster, dann klick Insert > Modulund geben Sie den folgenden Code ein:

VBA-Code: Entfernen Sie mehrere Zeilenumbrüche in einem Arbeitsblatt

Sub RemoveCarriage()
'Update 20131216
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

2. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Eingabeaufforderungsfeld angezeigt, in dem Sie aufgefordert werden, einen Bereich auszuwählen, in dem die Zeilenumbrüche entfernt werden sollen. Siehe Abbildung:

doc-remove-line-break4

3. Dann klick OK und alle Zeilenumbrüche der Auswahl wurden gelöscht.


Pfeil blau rechte Blase Entfernen Sie mehrere Zeilenumbrüche mit Kutools for Excel

Vielleicht vergessen Sie manchmal, wie Sie die Funktion Suchen und Ersetzen verwenden, oder kennen den Code nicht, um in dieser Situation mehrere Zeilenumbrüche zu entfernen. Kutools for Excel kann Ihnen helfen, dieses Problem zu lösen.

Kutools for Excel: Mit mehr als 300 praktischen Excel-Add-Ins können Sie es innerhalb von 30 Tagen ohne Einschränkung testen. Starten Sie jetzt

Führen Sie nach der Installation von Kutools for Excel die folgenden Schritte aus:

1. Wählen Sie den Bereich aus, in dem Sie die Wagenrückläufe entfernen möchten.

2. Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Kutoolen > Textwerkzeuge > Zeichen entfernen, siehe Screenshot:

doc-remove-line-break5

3. In dem Zeichen entfernen Dialogfeld überprüfen Nicht druckbar Option, und Sie können das Ergebnis aus der sehen Vorspann Fenster ebenfalls, siehe Screenshot:

doc-remove-line-break6

4. Und dann klick OK or Jetzt bewerben. Alle Zeilenumbrüche werden aus den ausgewählten Zellen entfernt.

Klicken Sie hier, um mehr über diese Funktion zum Entfernen von Zeichen zu erfahren.


Weitere Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien    VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste    Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln    Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung


Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Obrigado pela dica! Funcionou muito bem aqui!
This comment was minimized by the moderator on the site
Thank You so much yaar. I found it very useful for my day to day office works.
This comment was minimized by the moderator on the site
Thank you very much. it is really superb
This comment was minimized by the moderator on the site
Thank you werry helpfull for my and my MYSQL CSV import :-)
This comment was minimized by the moderator on the site
THANK YOU!!! I have been battling blank lines in cell for too long. You solved the problem...thank you so much
This comment was minimized by the moderator on the site
I am very inexperienced when it comes to macros/VBA code. How would I tweak the code you provided above and which I have pasted below to search for 2 consecutive carriage returns and replace with just one carriage return? Sub RemoveCarriage() 'Update 20131216 Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) For Each Rng In WorkRng Rng.Value = Replace(Rng.Value, Chr(10), "") Next End Sub Also, how would I locate and delete single carriage returns that have no text after them in a cell. Thank you for any assistance.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations