Vai al contenuto principale

Come rimuovere rapidamente le interruzioni di riga in Excel?

A volte, quando copi alcuni dati dal sito web o separi i tuoi valori con Alt + Invio tasti, otterrai alcune interruzioni di riga o ritorni a capo, se desideri rimuovere rapidamente più interruzioni di riga in Excel come mostrato nelle schermate seguenti, puoi farlo come segue:

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

Rimuovi più interruzioni di riga con la funzione Trova e sostituisci

Rimuovi più interruzioni di riga con il codice VBA

Rimuovi più interruzioni di riga con Kutools per Excel


freccia blu freccia destra Rimuovi più interruzioni di riga con la funzione Trova e sostituisci

Puoi rimuovere più interruzioni di riga rapidamente con la funzione Trova e sostituisci in Excel, elaboralo come segue:

1. Seleziona l'intervallo in cui desideri rimuovere più interruzioni di riga.

2. Clic Casa > Trova e sostituisci > sostituire oppure fare clic su Ctrl + F scorciatoie e un file Trova e sostituisci apparirà la finestra di dialogo.

3. Quindi nel Trova quello che casella, tieni premuto il pulsante ALT chiave, quindi fare clic sui numeri 010 dalla tastiera numerica. Lasciare il Sostituire con casella vuota o immettere una barra spaziatrice. Vedi screenshot:

doc-remove-line-break3

4. E poi clicca Sostituisci tutto pulsante, tutte le interruzioni di riga sono state rimosse. Vedi screenshot:

doc-remove-line-break2


freccia blu freccia destra Rimuovi più interruzioni di riga con il codice VBA

Il seguente codice VBA può anche aiutarti a eliminare tutte le interruzioni di riga in un foglio di lavoro. Per favore, fai come segue:

1. Clic Costruttori > Visual Basic oppure premere Alt + F11 chiavi per aprire il Finestra di Microsoft Visual Basic per applicazioni, quindi fare clic inserire > Modulie inserisci il codice seguente:

Codice VBA: rimuove più interruzioni di riga in un foglio di lavoro

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. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di messaggio per dirti di selezionare un intervallo in cui desideri rimuovere le interruzioni di riga, vedi screenshot:

doc-remove-line-break4

3. Quindi fare clic OK e tutte le interruzioni di riga della selezione sono state eliminate.


freccia blu freccia destra Rimuovi più interruzioni di riga con Kutools per Excel

Forse a volte dimenticherai come utilizzare la funzione Trova e sostituisci o non avrai familiarità con il codice per rimuovere più interruzioni di riga, in questa situazione, Kutools for Excel può aiutarti a risolvere questo problema.

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Get it Now

Dopo aver installato Kutools per Excel, eseguire i seguenti passaggi:

1. Seleziona l'intervallo in cui desideri rimuovere i ritorni a capo.

2. Clicchi Kutools > Strumenti di testo > Rimuovi personaggi, vedi screenshot:

doc-remove-line-break5

3. Nel Rimuovi personaggi finestra di dialogo, controllare Non stampabile opzione e puoi vedere il risultato dal file Anteprima anche nel riquadro, vedi screenshot:

doc-remove-line-break6

4. E poi clicca OK or APPLICA. Tutte le interruzioni di riga verranno rimosse dalle celle selezionate.

Fare clic per saperne di più su questa funzione Rimuovi caratteri.


Articoli Correlati:

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
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