Hoe converteer je een carriage return naar een komma in Excel?

Misschien heb je veel cellen waarvan de waarden gescheiden zijn door carriage returns, en nu moet je alle carriage returns vinden en vervangen door komma's of andere tekens zoals in de volgende schermafbeelding te zien is. Hoe kun je alle carriage returns snel en gemakkelijk in een werkblad naar komma's of andere tekens omzetten?

Carriage returns omzetten naar komma's met een formule

Carriage returns omzetten naar komma's met de functie Zoeken en Vervangen

Carriage returns omzetten naar komma's met VBA-code

Carriage returns omzetten naar komma's met een formule

De volgende eenvoudige formule kan je helpen om de carriage returns gemakkelijk te vervangen door komma's of andere tekens.

1. Typ deze formule in een lege cel naast uw gegevens: =SUBSTITUTE(A1,CHAR(10),",") (A1 geeft de cel aan die u wilt vervangen, en de komma tussen de aanhalingstekens is het teken dat u wilt gebruiken, u kunt ze naar wens wijzigen.), zie screenshot:

2. Sleep vervolgens de vulgreep over het bereik waarop u deze formule wilt toepassen, en u krijgt het volgende resultaat waarbij de carriage returns vervangen zijn door komma's.

Carriage returns omzetten naar komma's met de functie Zoeken en Vervangen

De functie Zoeken en Vervangen kan u ook helpen om de carriage returns in één keer naar komma's om te zetten. Doe het volgende:

1. Selecteer het gegevensbereik waarin u de carriage returns wilt omzetten.

2. Klik op Start > Zoeken en selecteren > Vervangen of gebruik de sneltoetsen Ctrl + H om het dialoogvenster Zoeken en vervangen te openen, zie screenshot:

3. In het dialoogvenster Zoeken en vervangen, in het veld Zoeken naar, druk op Ctrl + J, en in het veld Vervangen door, typ de tekens die u wilt, in dit geval typ ik de komma (,), zie screenshot:

4. Klik vervolgens op de knop Alles vervangen, en er verschijnt een pop-upvenster dat u eraan herinnert hoeveel vervangingen zijn gemaakt. Zie screenshot:

5. Klik vervolgens op OK en sluit het dialoogvenster Zoeken en vervangen, alle carriage returns zijn vervangen door komma's.

Carriage returns omzetten naar komma's met VBA-code

Als je geïnteresseerd bent in VBA-code, kan ik je een code introduceren om deze taak uit te voeren.

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.

VBA-code: Carriage returns omzetten naar komma's

Sub ReplaceCarriage()
'Update 20141023
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

3. Druk vervolgens op de toets F5 om deze code uit te voeren, en er verschijnt een pop-upvenster dat u eraan herinnert het gegevensbereik te selecteren dat u wilt gebruiken. Zie screenshot:

4. Klik vervolgens op OK, en de carriage returns zijn onmiddellijk omgezet naar komma's.

Opmerking:

In de bovenstaande code kunt u de komma "," binnen het script Rng.Value = Replace(Rng.Value, Chr(10), ",") wijzigen in elk ander teken naar keuze.

Gerelateerde artikelen:

Hoe snel regelafbrekingen in Excel te verwijderen?

Hoe cellen in meerdere kolommen of rijen te splitsen door carriage return?