Vai al contenuto principale

Come rimuovere rapidamente i trattini dalle celle in Excel?

Supponendo che ci sia un elenco di codici postali o numeri ISBN lunghi nelle celle del foglio di lavoro e che i numeri lunghi contengano trattini, per qualche scopo è necessario eliminare i trattini tra i numeri (come mostrano le schermate seguenti). Esistono modi rapidi per rimuovere questi trattini tra i numeri in Excel?

Rimuovi i trattini dalle celle con la formula
Rimuovi i trattini dalle celle con codice VBA
Rimuovi facilmente i trattini dalle celle con Kutools per Excel


Rimuovi i trattini dalle celle con la formula

Con questo SOSTITUIRE funzione, i numeri verranno convertiti in valori di testo, quindi quando rimuovi i trattini, né lo 0 iniziale verrà rimosso né i numeri diventeranno notazione scientifica. Si prega di fare quanto segue:

1. In una cella vuota adiacente, ad esempio C1, inserisci questa formula: = SOSTITUISCI (A1, "-", ""), vedi screenshot:

2. stampa entrare e seleziona la cella C1, quindi trascina il quadratino di riempimento sull'intervallo in cui desideri contenere questa formula. E i trattini tra i numeri sono stati rimossi. Vedi screenshot:

Rimuovi facilmente tutti i caratteri numerici, non numerici o specificati come "trattini" dalle celle in Excel:

Kutools for Excel's Rimuovi personaggi l'utilità ti aiuta a rimuovere facilmente tutti i caratteri numerici, non numerici o specificati dalle celle selezionate in Excel.
Scaricalo e provalo ora! (Percorso gratuito di 30 giorni)


Rimuovi i trattini dalle celle con codice VBA

Con il seguente codice VBA, puoi anche rimuovere i trattini tra i numeri da un intervallo di celle.

1. Evidenzia l'intervallo in cui desideri rimuovere i trattini.

2. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

3. Clic inserire > Modulie incolla il codice seguente nella finestra del modulo.

VBA: rimuove i trattini tra i numeri

Sub DeleteDashes()
'Update 20130907
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)
Application.ScreenUpdating = False
For Each rng In WorkRng
    rng.NumberFormat = "@"
    rng.Value = VBA.Replace(rng.Value, "-", "")
Next
Application.ScreenUpdating = True
End Sub

4. Quindi premere F5 chiave per eseguire questo codice e viene visualizzata una finestra di dialogo per dirti di selezionare un intervallo che desideri utilizzare. Vedi screenshot:

5. E poi clicca OK, i trattini tra i numeri sono stati rimossi dalle celle. E il formato del numero viene convertito in formato testo. Vedi screenshot:


Rimuovi i trattini dalle celle con Kutools per Excel

Se sei un principiante di Excel, sia la formula che il codice sono difficili per te, per favore non preoccuparti, il file Kutools for Excel'S Rimuovi personaggi può aiutarti a eliminare rapidamente i trattini dalle celle.

Prima di applicare Kutools for Excel, Per favore scaricalo e installalo prima.

1. Seleziona l'intervallo di celle di cui hai bisogno per rimuovere i trattini, quindi fai clic su Kutools > Testo > Rimuovi personaggi, vedi screenshot:

2. Nel Rimuovi personaggi finestra di dialogo, controllare Custom opzione e digita "-"Nella casella di testo, quindi puoi visualizzare in anteprima i risultati dal Anteprima Pannello. Quindi fare clic su OK pulsante per rimuovere tutti i trattini nelle celle selezionate. Vedi screenshot:

Note:. Se le celle selezionate contengono zeri iniziali o molte cifre, per mantenere gli zeri iniziali ed evitare che il numero diventi notazione scientifica dopo aver rimosso i trattini, è necessario formattare le celle come Testo come mostrato nell'immagine sottostante prima di applicare il Rimuovi personaggi utilità.

  Se desideri avere una prova gratuita (30 giorni) di questa utility, fare clic per scaricarlo, quindi andare ad applicare l'operazione secondo i passaggi precedenti.


Rimuovi facilmente i trattini dalle celle con Kutools per Excel


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 (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
this and the concatenate command have saved my brain from melting! thank you!
This comment was minimized by the moderator on the site
Sub DeleteDashes() 'Update 20130907 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) Application.ScreenUpdating = False For Each rng In WorkRng rng.NumberFormat = "@" rng.Value = VBA.Replace(rng.Value, "-", "") Next Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
unimpressed with your instructions - using the =SUBSTITUTE formula above, the leading zeros are stripped
This comment was minimized by the moderator on the site
THANK YOU EXTEND OFFICE IT'S VERY HELPFUL AND SIMPLE.. KUDOS!
This comment was minimized by the moderator on the site
Use the find and replace feature. (Ctrl + F, click the replace tab). Enter "-" Into the find field (or whatever you're trying to remove) and hit the replace button. Make sure you leave the "Replace with" field blank.
This comment was minimized by the moderator on the site
Great it works
This comment was minimized by the moderator on the site
WOW.... You win this whole thread, THANK YOU!!!
This comment was minimized by the moderator on the site
Hi, This is manish gupta and it is the good code of removing the border areas in excel sheets. thanks and regards manish gupta
This comment was minimized by the moderator on the site
HI , MY PROBMEL SOLVE PLEASE
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations