Note: The other languages of the website are Google-translated. Back to English
Přihlásit se  \/ 
x
or
x
Registrace  \/ 
x

or

Jak rychle odstranit konce řádků v aplikaci Excel?

Někdy, když kopírujete některá data z webu nebo oddělujete své hodnoty pomocí Alt + Enter klíče, získáte několik zalomení řádků nebo návratů vozíku, pokud chcete rychle odstranit více zalomení řádků v aplikaci Excel podle následujících zobrazených snímků obrazovky, můžete to udělat následujícím způsobem:

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

Odstraňte více konců řádků pomocí funkce Najít a nahradit

Odstraňte více konců řádků pomocí kódu VBA

Odstraňte více konců řádků pomocí programu Kutools pro Excel

Karta Office Povolte úpravy a procházení na kartách v Office a vaše práce bude mnohem jednodušší ...
Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%
  • Znovu použít cokoli: Přidejte do svých oblíbených nejpoužívanější nebo nejsložitější vzorce, grafy a cokoli jiného a rychle je v budoucnu znovu použijte.
  • Více než 20 textových funkcí: Extrahovat číslo z textového řetězce; Extrahovat nebo odebrat část textů; Převádějte čísla a měny na anglická slova.
  • Sloučit nástroje: Více sešitů a listů do jednoho; Sloučit více buněk / řádků / sloupců bez ztráty dat; Sloučit duplicitní řádky a součet.
  • Rozdělené nástroje: Rozdělit data do více listů na základě hodnoty; Jeden sešit pro více souborů Excel, PDF nebo CSV; Jeden sloupec na více sloupců.
  • Vložit přeskakování Skryté / filtrované řádky; Count And Sum podle barvy pozadí; Posílejte hromadně osobní e-maily více příjemcům.
  • Super filtr: Vytvořte pokročilá schémata filtrů a použijte je na jakékoli listy; Typ podle týdne, dne, frekvence a dalších; Filtr tučně, vzorce, komentovat ...
  • Více než 300 výkonných funkcí; Funguje s Office 2007-2019 a 365; Podporuje všechny jazyky; Snadné nasazení ve vašem podniku nebo organizaci.


šipka modrá pravá bublina Odstraňte více konců řádků pomocí funkce Najít a nahradit

Pomocí funkce Najít a nahradit v aplikaci Excel můžete rychle odstranit více konců řádků, zpracovejte to prosím následujícím způsobem:

1. Vyberte rozsah, ze kterého chcete odstranit více konců řádků.

2, klikněte Domovská stránka > Najít a nahradit > Nahradit nebo klikněte Ctrl + F zkratky a a Najít a nahradit Zobrazí se dialogové okno.

3. Pak v Najít to, co pole, podržte prosím ALT klíč a potom klepněte na čísla 010 z numerické klávesnice. Opustit Nahradit prázdné pole nebo zadejte mezeru. Viz screenshot:

doc-remove-line-break3

4. A pak klikněte na tlačítko Nahradit vše tlačítko, všechny konce řádků byly odstraněny. Viz screenshot:

doc-remove-line-break2


šipka modrá pravá bublina Odstraňte více konců řádků pomocí kódu VBA

Následující kód VBA vám také pomůže odstranit všechny konce řádků v listu. Udělejte prosím toto:

1, klikněte Vývojka > Visual Basic nebo stiskněte tlačítko Alt + F11 klávesy pro otevření Okno Microsoft Visual Basic pro aplikace, poté klepněte na tlačítko Vložit > Modula zadejte následující kód:

Kód VBA: odstraňte více konců řádků v listu

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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se výzva k výběru rozsahu, který chcete odstranit zalomení řádků, viz screenshot:

doc-remove-line-break4

3. Pak klikněte na tlačítko OK a všechny konce řádků výběru byly odstraněny.


šipka modrá pravá bublina Odstraňte více konců řádků pomocí programu Kutools pro Excel

Možná někdy v této situaci zapomenete, jak používat funkci Najít a nahradit nebo neznáte kód k odstranění více konců řádků, Kutools pro Excel vám pomůže vyřešit tento problém.

Kutools pro Excel: s více než 300 praktickými doplňky aplikace Excel, můžete vyzkoušet bez omezení do 30 dnů. Získat nyní

Po instalaci Kutools pro Excel proveďte následující kroky:

1. Vyberte rozsah, ze kterého chcete odebrat konce řádku.

2. klikněte Kutools > Textové nástroje > Odebrat znaky, viz screenshot:

doc-remove-line-break5

3. V Odebrat znaky v dialogovém okně zaškrtněte Netiskněte možnost, a můžete vidět výsledek z Náhled také v podokně, viz screenshot:

doc-remove-line-break6

4. A pak klikněte na tlačítko OK or aplikovat. Všechny konce řádků budou z vybraných buněk odstraněny.

Klepnutím získáte další informace o této funkci Odebrat znaky.


Související články:


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ajay Kumar Mohini · 6 years ago
    Thank You so much yaar. I found it very useful for my day to day office works.
  • To post as a guest, your comment is unpublished.
    Balamurugan · 6 years ago
    Thank you very much. it is really superb
  • To post as a guest, your comment is unpublished.
    meter21 · 7 years ago
    Thank you werry helpfull for my and my MYSQL CSV import :-)
  • To post as a guest, your comment is unpublished.
    Mary Pugh · 7 years ago
    THANK YOU!!! I have been battling blank lines in cell for too long.

    You solved the problem...thank you so much
  • To post as a guest, your comment is unpublished.
    kcjt2009 · 7 years ago
    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.