Excel aggiunge Dividi per testo e numero nella posizione specificata della cella
In Excel, aggiungere testo o numeri alle celle è un’operazione molto comune: ad esempio, inserire spazi tra i nomi, aggiungere prefissi o suffissi alle celle oppure inserire trattini nei numeri di sicurezza sociale. Questa guida illustra quasi tutti gli scenari di aggiunta in Excel e presenta i metodi corrispondenti.
Nota
In questa guida sono presentati alcuni esempi per illustrare i metodi; puoi adattare i riferimenti alle tue esigenze quando utilizzi i codici VBA o le formule riportati di seguito, oppure scaricare gli esempi per testare subito i metodi.
Fare clic per scaricare il file di esempio
Questa parte elenca diversi metodi per aggiungere caratteri all'inizio di ogni cella, come mostrato nell'immagine seguente:
1,1 Aggiungi all'inizio delle celle utilizzando una formula
È possibile scegliere una delle tre formule seguenti:
Formula 1: operatore di concatenazione «&»
Unisce più testi utilizzando il carattere «&».
«testo»&cella
Formula 2: funzione CONCATENA
La funzione CONCATENA unisce testi in modo semplice e veloce.
CONCATENA(«testo»;cella)
Formula 3: funzione CONCAT
Questa funzione è disponibile esclusivamente in Excel 2019, Office 365 ed Excel Online.
CONCAT(«testo»;cella)
Nelle formule generiche: «cella» indica il riferimento alla cella contenente il testo a cui si vuole aggiungere un prefisso, mentre «testo» rappresenta il prefisso da aggiungere alla cella.
Utilizzando l'esempio precedente, è possibile applicare le formule in Barra delle formule come segue:
«&»
=$E$3&B3oppure =«Iphone»&B3
Funzione CONCATENA
=CONCATENA($E$3;B3)oppure =CONCATENATE(«Iphone»,B3)
Funzione CONCAT
=CONCAT($E$3;B3)oppure =CONCAT(«Iphone»,B3)
Premere il tasto Invio per ottenere il risultato, quindi trascinare il quadratino di riempimento automatico verso il basso fino ad aggiungere testo in ogni cella dell'intervallo B3:B6. 
| Attenzione: il testo deve essere racchiuso tra virgolette doppie, altrimenti la formula restituisce un errore #NOME?. Se si utilizza un riferimento di cella a un testo, ricordarsi di usare il riferimento assoluto; è possibile premere il tasto F4 per trasformare il riferimento relativo in assoluto. |
1,2 Aggiungi all'inizio delle celle con Riempimento automatico
Se utilizzi Excel 2013 o versioni successive, la potente nuova funzionalità Riempimento automatico ti consente di compilare automaticamente le celle in base ai dati inseriti nelle celle superiori.
Selezionare una cella accanto al primo dato originale e digitare manualmente il primo dato con il testo di prefisso, come mostrato di seguito:
Quindi, nella cella sottostante, continua a digitare il secondo dato con il prefisso; durante la digitazione apparirà un elenco in grigio: premi il tasto Invio per consentire al Riempimento automatico di compilare automaticamente i dati.

Se l'elenco di anteprima non viene generato, vai alla scheda Home e fai clic su Riempi > Riempimento automatico per eseguirlo manualmente.
1,3 Aggiungi all'inizio delle celle utilizzando il codice VBA
Se conosci il codice VBA, ecco un esempio per aggiungere testo all’inizio di ogni cella in un intervallo.
1. Seleziona un intervallo di celle a cui desideri aggiungere il testo di prefisso, quindi premi i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Nella finestra che si apre, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copia e incolla il seguente codice VBA nel nuovo modulo.
VBA: Aggiungi all'inizio delle celle
Sub AppendToExistingOnLeft()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = "Iphone" & c.Value
Next
End Sub | Attenzione: nello script di codice,Iphoneè il testo che si desidera aggiungere all'inizio delle celle selezionate; modificarlo in base alle proprie esigenze. |

4. Premere il tasto F5 oppure fare clic sul pulsante Esegui
nella finestra per attivare il codice VBA.
Ora tutte le celle selezionate hanno il testo «iPhone» aggiunto all'inizio.
Oltre ad aggiungere testo all’inizio delle celle, un’operazione altrettanto comune è aggiungere testo alla fine delle celle. Di seguito, come illustrato nell’immagine, viene mostrato un esempio in cui un’unità viene aggiunta alla fine di ogni cella:
2,1 Aggiungi alla fine delle celle utilizzando una formula
È possibile scegliere una delle tre formule seguenti:
Formula 1: operatore di concatenazione «&»
Unisce più testi utilizzando il carattere «&».
Cella&«testo»
Formula 2: funzione CONCATENA
La funzione CONCATENA unisce testi in modo rapido e intuitivo.
CONCATENA(cella,«testo»)
Formula 3: funzione CONCAT
Questa funzione è disponibile esclusivamente in Excel 2019, Office 365 ed Excel Online.
CONCAT(cella,«testo»)
Nelle formule generiche: «cella» indica il riferimento alla cella contenente il testo a cui si vuole aggiungere un suffisso, mentre «testo» rappresenta il suffisso da aggiungere alla cella.
Utilizzando l'esempio sopra, è possibile usare le seguenti formule in Barra delle formule:
«&»
=B3&$E$3oppure =B3&«Kg»
Funzione CONCATENA
=CONCATENA(B3; $E$3)oppure =CONCATENATE(B3, «Kg»)
Funzione CONCAT
=CONCAT(B3; $E$3)oppure =CONCAT(B3, «Kg»)
Premere il tasto Invio per ottenere il risultato, quindi trascinare la maniglia di riempimento automatico verso il basso fino ad aggiungere testo alla fine di ogni cella dell'intervallo B3:B6. 
| Attenzione: Il testo deve essere racchiuso tra virgolette doppie; in caso contrario, la formula restituirà il valore di errore #NOME?. Se si utilizza un riferimento di cella contenente testo, ricordarsi di usare il riferimento assoluto; è possibile premere il tasto F4 per convertire un riferimento relativo in assoluto. |
2,2 Aggiungi alla fine delle celle con Riempimento rapido
Se utilizzi Excel 2013 o versioni successive, la potente nuova funzionalità Riempimento automatico compila automaticamente le celle in base ai valori inseriti nelle celle soprastanti.
Scegliere una cella accanto al primo dato originale e digitare manualmente il primo dato con il testo del suffisso, come mostrato di seguito:
Quindi, attiva la cella sotto il primo risultato e fai clic su Dati > Riempimento rapido: tutte le celle sottostanti, inclusa quella attiva, verranno compilate automaticamente.

2,3 Aggiungi alla fine delle celle utilizzando codice VBA
Di seguito è riportato un codice VBA che consente di aggiungere testo alla fine di ogni cella in un intervallo.
1. Seleziona un intervallo di celle a cui desideri aggiungere il testo del suffisso, quindi premi i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Nella finestra visualizzata, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copia e incolla il seguente codice VBA nel nuovo modulo.
VBA: Aggiungi alla fine delle celle
Sub AppendToExistingOnRight()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = c.Value & "Kg"
Next
End Sub | Attenzione: nello script di codice,Kgè il testo che si desidera aggiungere alla fine delle celle selezionate; modificarlo in base alle proprie esigenze. |

4. Premere F5 oppure fare clic sul pulsante Esegui
nella finestra per attivare il codice VBA.
Ora il testo «Kg» è stato aggiunto alla fine di ogni cella.
Per molti utenti, aggiungere testo all’inizio o alla fine delle celle è semplice, ma inserirlo nel mezzo può risultare più complesso. Ad esempio, come illustrato nell’immagine seguente, si desidera aggiungere un delimitatore — come i due punti “:” — dopo il secondo carattere di ogni cella nell’intervallo B3:B7. 
3,1 Aggiungi dopo l'n-esimo carattere della stringa mediante formula
Sono disponibili quattro formule per eseguire questa operazione: sceglierne una da utilizzare:
Formula 1: Combinare le funzioni SINISTRA e DESTRA
SINISTRA(cella; n) & «testo» & DESTRA(cella; LUNGHEZZA(cella) -n)
Formula 2: Combinare le funzioni CONCATENA (o CONCAT), DESTRA e LUNGHEZZA
CONCATENA(SINISTRA(cella; n); «testo»; DESTRA(cella; LUNGHEZZA(cella) -n))
Oppure
CONCAT(SINISTRA(cella; n); «testo»; DESTRA(cella; LUNGHEZZA(cella) -n))
Formula 3: Funzione SOSTITUISCI
SOSTITUISCI(cella; n+1; 0; «testo»)
Nelle formule generiche: «cella» è il riferimento alla cella contenente il testo in cui si desidera aggiungere del testo in mezzo, «testo» è il testo da inserire e «n» è il numero che indica dopo quale carattere della stringa si vuole aggiungere il nuovo testo.
Per risolvere il problema descritto sopra, utilizzare le seguenti formule:
Combinare le funzioni SINISTRA e DESTRA
=SINISTRA(B3; 2) & ":" & DESTRA(B3; LUNGHEZZA(B3) -2)oppure =SINISTRA(B3; 2) & $E$3 & DESTRA(B3; LUNGHEZZA(B3) -2)
Combinare le funzioni CONCATENA (o CONCAT), DESTRA e LUNGHEZZA
=CONCATENATE(LEFT(B3, 2), ":", RIGHT(B3, LEN(B3) -2))oppure =CONCAT (LEFT(B3, 2), ":", RIGHT(B3, LEN(B3) -2))
Funzione SOSTITUISCI
=REPLACE(B3, 2+1, 0, ":")oppure =SOSTITUISCI(B3; 2+1; 0; $E$3)
Premere il tasto Invio per ottenere il risultato, quindi trascinare la maniglia di riempimento automatico verso il basso fino a quando non si aggiunge il testo dopo il secondo carattere di ogni cella nell'intervallo B3:B7. 
| Attenzione: il testo deve essere racchiuso tra virgolette doppie, altrimenti la formula restituisce un errore #NOME?. Se si utilizza un riferimento di cella a un testo, ricordarsi di usare il riferimento assoluto; è possibile premere il tasto F4 per trasformare il riferimento relativo in assoluto. |
3,2 Aggiungi dopo l'n-esimo carattere della stringa con Riempimento rapido
Se utilizzi Excel 2013 o versioni successive, la funzionalità Riempimento rapido ti consente di compilare automaticamente le celle in base ai dati inseriti nelle celle soprastanti.
Scegliere una cella accanto al primo dato originale e digitare manualmente il primo dato con i due punti dopo il secondo carattere, come mostrato di seguito:
Quindi, attiva la cella sotto il primo risultato e premi i tasti Ctrl+E per attivare il comando Riempimento rapido: tutte le celle sottostanti, inclusa quella attiva, verranno compilate automaticamente.
| Attenzione: se si utilizza un sistema Mac, premere i tasti Comando + E. |
3,3 Aggiungi dopo l'n-esimo carattere della stringa utilizzando codice VBA
Anche un codice VBA può eseguire questa operazione.
1. Premere i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Nella finestra visualizzata, fare clic su Inserisci>Moduloper inserire un nuovo modulo vuoto.
3. Copia e incolla il seguente codice VBA nel nuovo modulo.
VBA: Aggiungi nel mezzo delle celle
Sub AddToMidduleOfString()
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 = VBA.Left(Rng.Value, 2 & ":" & VBA.Mid(Rng.Value, 3, VBA.Len(Rng.Value) - 1)
Next
End Sub | Attenzione: nello script di codice,2è la somma di 2 e della lunghezza del testo aggiunto. Per fare un altro esempio, per aggiungere «and» dopo il primo carattere della stringa «A B», lo script dovrebbe essere Rng.Value = VBA.Left(Rng.Value,)andè il numero che definisce la posizione dopo la quale si desidera Aggiungi testo,:è il testo da aggiungere,31) & «» & VBA.Mid(Rng.Value,4, VBA.Len(Rng.Value) - 1) |

4. Premere il tasto F5 oppure fare clic sul pulsante Esegui
nella finestra per attivare il codice VBA. Si aprirà una finestra di dialogo per selezionare le celle a cui aggiungere testo.
5. Fare clic su OK. Ora il testo ":" è stato aggiunto dopo il secondo carattere di ogni cella nell'intervallo B19:B23. 
Se sei stanco di formule e codici VBA, prova uno strumento potente e pratico: Kutools per Excel, che include la funzionalità Aggiungi testo.
Questa funzionalità Aggiungi testo consente di:
- Aggiungi testo Prima del primo carattere
- Aggiungi testo Dopo l'ultimo carattere
- Aggiungi testo in posizioni specificate
- Estensione
Aggiungi testo Prima delle lettere maiuscole
Aggiungi testo Prima delle lettere minuscole
Aggiungi testo Prima delle lettere maiuscole e minuscole
Aggiungi testo Prima dei numeri
Seleziona le celle a cui desideri aggiungere del testo, quindi applica la funzione Kutools > Testo > Aggiungi testo.
4,1 Aggiungi testo prima del primo carattere o dopo l'ultimo carattere
Nella finestra di dialogo Aggiungi testo, digita il testo da aggiungere alle celle nella casella Testo, quindi seleziona Prima del primo carattere nella sezione Posizione.
Fai clic su Applica o su OK per completare l'aggiunta.
Per aggiungere testo dopo l'ultimo carattere, digita il testo da aggiungere alle celle nella casella Testo, quindi seleziona Dopo l'ultimo carattere nella sezione Posizione.
Fai clic su Applica o su OK per completare l'aggiunta.
4,2 Aggiungi testo in posizione(i) specificata(e)
A volte potrebbe essere necessario Aggiungi testo al centro della cella oppure Aggiungi testo in diverse posizioni all'interno della cella. Si supponga, ad esempio, di voler aggiungere il separatore "-" dopo la terza e la settima cifra dei numeri di previdenza sociale, come mostrato nello screenshot seguente:
Nella finestra di dialogo Aggiungi testo, digita il testo nella casella Testo, seleziona l'opzione Specifica, inserisci quindi le posizioni separate da virgole nella casella di testo e fai clic su OK o su Applica.
Estensione 4,3 dell'utilità Aggiungi testo
Oltre a Aggiungi testo nelle posizioni normali (inizio, fine e posizione specificata), l'utilità Aggiungi testosupporta anche Aggiungi testo
- Prima delle lettere maiuscole
- Prima delle lettere minuscole
- Prima delle lettere maiuscole e minuscole
- Prima dei numeri
Nella finestra di dialogo Aggiungi testo, digita il testo nella casella Testo, quindi seleziona l'opzione Aggiungi solo a e fai clic sul menu a discesa sottostante per scegliere l'operazione desiderata.

Questa sezione presenta formule per aggiungere testo prima o dopo la prima occorrenza di un testo specifico in Excel.
5,1 Aggiungi testo prima del primo testo specifico
Ad esempio, si desidera Aggiungi testo «(vendita)» prima della prima occorrenza della parola «prezzo» nella cella, come mostrato negli screenshot seguenti:
In Excel, le funzioni SOSTITUISCI e RIMPIAZZA possono risolvere questo compito.
Funzione SOSTITUISCI
RIMPIAZZA(cella;TROVA(«testo_da_trovare»;cella);0;«testo_da_aggiungere»)
Funzione SOSTITUISCI
SOSTITUISCI(cella;«testo_da_trovare»;«testo_sostitutivo»;1)
In questo caso, utilizza le formule indicate sopra nel modo seguente:
=REPLACE(B4,FIND(«price»,B4),0,«(sale)»)
Oppure
=SUBSTITUTE(B4,«price»,«(sale)price»,1)
Gli argomenti delle formule in questo caso sono
Cella: B4,
Testo_da_trovare: prezzo,
Testo_da_aggiungere: (vendita),
(vendita) prezzo.
Premi il tasto Invio per ottenere il primo risultato, quindi trascina il quadratino di riempimento automatico sulle celle a cui vuoi applicare la formula.
5,2 Aggiungi testo dopo il primo testo specifico
Ad esempio, si desidera aggiungere il simbolo di valuta «$» dopo i primi due punti ":" nella cella, come mostrato negli screenshot seguenti:
In Excel, le funzioni SOSTITUISCI e RIMPIAZZA possono gestire questo compito in modo efficace.
Funzione SOSTITUISCI
RIMPIAZZA(cella;TROVA(«testo_da_trovare»;cella);lunghezza_testo_da_trovare;«testo_sostitutivo»)
Funzione SOSTITUISCI
SOSTITUISCI(cella;«testo_da_trovare»;«testo_sostitutivo»)
In questo caso, utilizza le formule indicate sopra nel modo seguente:
=REPLACE(B12,FIND(":",B12),1,«:$»)
Oppure
=SUBSTITUTE(B12,":",«:$»)
Gli argomenti delle formule in questo caso sono
Cella: B12,
Testo_da_trovare: :,
Testo sostitutivo::$.
Lunghezza_testo_da_trovare:1
Premi il tasto Invio per ottenere il primo risultato, quindi trascina il quadratino di riempimento automatico sulle celle a cui vuoi applicare la formula.
In questa parte del tutorial vengono presentati tre metodi diversi (formula, Trova e sostituisci, VBA) per aggiungere caratteri prima o dopo ogni parola di una cella.
| Aggiungi caratteri prima di ogni parola |
![]() |
| Aggiungi caratteri dopo ogni parola |
![]() |
6,1 Aggiungi carattere/i prima o dopo ogni parola con formula
La funzione SOSTITUISCI può essere utilizzata per risolvere questo compito; le formule generali sono le seguenti:
Aggiungi prima di ogni parola
«carattere»&SOSTITUISCI(stringa; « »;« carattere»)
Aggiungi dopo ogni parola
SOSTITUISCI(stringa;« »;«carattere »)&«carattere»
Si supponga di voler aggiungere il simbolo «+» prima di ogni parola nell'elenco B3:B6; utilizza la seguente formula:
=«+»&SUBSTITUTE(B3, " "," +")
Premi il tasto Invio per ottenere il primo risultato, quindi trascina il quadratino di riempimento automatico verso il basso per visualizzare tutti i risultati.
Si supponga di voler aggiungere ($) dopo ogni parola dell'elenco B11:B14; utilizza la seguente formula:
=SUBSTITUTE(B11,« »,«($) »)&«($)»
Premi il tasto Invio per ottenere il primo risultato, quindi trascina il quadratino di riempimento automatico verso il basso per generare tutti i risultati.
6,2 Aggiungi carattere/i prima o dopo ogni parola con Trova e sostituisci
Se desideri aggiungere caratteri prima di ogni parola, escludendo la prima, oppure dopo ogni parola, escludendo l’ultima — come mostrato nello screenshot seguente — puoi usare l’utilità integrata di Excel Trova e sostituisci.
Aggiungi prima di ogni parola escludendo la prima 
Aggiungi dopo ogni parola escludendo Ultima 
1. Seleziona le celle a cui desideri aggiungere caratteri prima o dopo ogni parola, quindi premi contemporaneamente i tasti Ctrl+H per aprire la finestra di dialogo Trova e sostituisci.
2. Nella casella Trova digita uno spazio; successivamente, nella casella Sostituisci con digita i nuovi caratteri seguiti da uno spazio, quindi fai clic sul pulsante Sostituisci tutto.
| Operazione | Generale | Esempio |
| Aggiungi caratteri prima di ogni parola | Aggiungi Nuovi Caratteri seguito da uno spazio | Aggiungi (vendita) prima di ogni parola |


| Operazione | Generale | Esempio |
| Aggiungi caratteri dopo ogni parola | Nuovi Caratteri seguito da uno spazio | Aggiungi - dopo ogni parola |


Di seguito trovi due codici VBA per aggiungere caratteri prima o dopo ogni parola. Per eseguirli, segui i passaggi indicati.
1. Premi contemporaneamente i tasti Alt+F11 per aprire la finestra Microsoft Visual Basic, Applications.
2. Nella finestra visualizzata, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copia e incolla il codice VBA seguente nel modulo.
Aggiungi prima di ogni parola
Sub InsertCharBeforeWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
On Error Resume Next
Set xSRg = Application.Selection
Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
If StrPtr(xInStr) = 0 Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
xArr = Split(xCell.Text, " ")
xValue = ""
For Each xStr In xArr
If Trim(xStr) <> "" Then
If xValue = "" Then
xValue = xInStr & Trim(xStr)
Else
xValue = xValue & " " & xInStr & Trim(xStr)
End If
End If
Next
xCell.Value = xValue
Next
Application.ScreenUpdating = True
End Sub Aggiungi dopo ogni parola
Sub InsertCharAfterWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
On Error Resume Next
Set xSRg = Application.Selection
Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
If StrPtr(xInStr) = 0 Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
xArr = Split(xCell.Text, " ")
xValue = ""
For Each xStr In xArr
If Trim(xStr) <> "" Then
If xValue = "" Then
xValue = Trim(xStr) & xInStr
Else
xValue = xValue & " " & Trim(xStr) & xInStr
End If
End If
Next
xCell.Value = xValue
Next
Application.ScreenUpdating = True
End Sub 4. Premi il tasto F5per eseguire il codice (oppure fai clic sul pulsante)Esegui
). Si aprirà una finestra di dialogo in cui ti verrà chiesto di selezionare le celle contigue su cui operare; fai clic su OK.
5. Nella seconda finestra di dialogo visualizzata, digita i caratteri da aggiungere e fai clic su OK.
I caratteri verranno quindi aggiunti all'inizio o alla fine di ogni parola.
A volte potresti voler aggiungere del testo tra ogni carattere. In questa sezione vengono presentati due scenari: il primo consiste nell’aggiungere del testo tra ogni carattere, mentre il secondo nell’inserire uno spazio tra ogni cifra.
7,1 Aggiungi testo tra ogni carattere/cifra con una funzione definita dall'utente
Per inserire caratteri tra ogni carattere di una stringa, puoi utilizzare una funzione personalizzata.
In questo caso, aggiungiamo uno spazio tra ogni carattere.
1. Premere Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra visualizzata, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copiare e incollare il codice VBA seguente nel modulo.
Aggiungi testo tra i caratteri
Function AddText(Str As String) As String
Dim i As Long
For i = 1 To Len(Str)
AddText = AddText & Mid(Str, i, 1) & " "
Next i
AddSpace = Trim(AddSpace)
End Function 4. Salva il codice e chiudi questa finestra per tornare al foglio di lavoro, quindi digita la seguente formula in una cella dove desideri visualizzare il risultato:
=AggiungiTesto(B3)
B3 è la cella che contiene la stringa a cui vuoi aggiungere spazi tra i caratteri.
5. Premi il tasto Invio per ottenere il risultato, quindi trascina il quadratino di riempimento automatico sulle altre celle secondo necessità.
| Attenzione: 1) Nel codice VBA puoi sostituire « » con altri testi a seconda delle tue esigenze; ad esempio, rimpiazzalo con "-" per inserire un trattino tra i caratteri. 2) Il codice aggiungerà il Testo Nuovo dopo ogni carattere. Puoi rimuovere l'ultimo Aggiungi testo se non ti serve, utilizzando la formula seguente. Per ulteriori dettagli sulla formula, visita: Come rimuovere i primi o gli ultimi N caratteri da una cella o una stringa in Excel? SINISTRA(cella;LUNGHEZZA(cella)-lunghezza_testo) |
7,2 Aggiungi spazi tra ogni cifra con una formula
Per aggiungere spazi tra le cifre di una stringa numerica, puoi utilizzare la funzione TESTO.
| AttenzioneI numeri dell'intervallo a cui si desidera aggiungere spazi devono avere tutti la stessa lunghezza; in caso contrario, alcuni risultati potrebbero risultare errati. |
Si supponga di avere un elenco di numeri a 8 cifre nell'intervallo B10:B12; Seleziona in una cella in cui si desidera visualizzare il risultato e digita la formula seguente:
=TEXT(B10,«# # # # # # # #»)
Premi il tasto Invio e trascina il quadratino di riempimento automatico sulle altre celle.
Se la lunghezza dei numeri è 5, la formula diventerà =TEXT(B10,«# # # # #»).
Se si desidera aggiungere carattere(i) tra ogni parola, ad esempio uno spazio tra nome, secondo nome e Cognome come mostrato nello screenshot seguente, è possibile utilizzare una funzione definita dall'utente.
1. Premere Alt+F11per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra che compare, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copiare e incollare il codice VBA seguente nel modulo.
Aggiungi caratteri tra le parole
Function AddCharacters(pValue As String) As String
'UpdatebyExtendoffice20160908
Dim xOut As String
xOut = VBA.Left(pValue, 1)
For i = 2 To VBA.Len(pValue)
xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
If xAsc >= 65 And xAsc <= 90 Then
xOut = xOut & " " & VBA.Mid(pValue, i, 1)
Else
xOut = xOut & VBA.Mid(pValue, i, 1)
End If
Next
AddCharacters = xOut
End Function 4. Salvare il codice e premere **Chiudi questa finestra** per tornare al foglio di lavoro, quindi digitare la formula seguente nella cella in cui si desidera visualizzare il risultato.
=AddCharacters(B3)
B3 è la cella che contiene la stringa a cui vuoi aggiungere spazi tra le parole.
5. Premere il tasto Invio per ottenere il risultato, quindi trascinare la maniglia di riempimento automatico sulle altre celle per generare ulteriori risultati.
| Attenzione: nel codice VBA, è possibile modificare il « »ad altri testi secondo necessità; ad esempio, modificarlo in "-"per aggiungere - tra le parole. |
Per aggiungere carattere(i) specifico(i) tra Dividi per testo e numero, come mostrato nello screenshot seguente, sono disponibili due metodi.
9,1 Aggiungere caratteri tra Dividi per testo e numero con una formula
Se il testo precede i numeri, la formula generica è:
TRIM(REPLACE(stringa,MIN(FIND({1,2,3,4,5,6,7,8,9,0},stringa&"1234567890")),0,"-"))
Utilizzando il caso precedente come esempio, applicare la seguente formula:
=TRIM(REPLACE(B4,MIN(FIND({1,2,3,4,5,6,7,8,9,0},B4&"1234567890")),0,"-"))
Premere il tasto Invio per ottenere il primo risultato, quindi trascinare la maniglia di riempimento automatico sulle altre celle per estendere la formula.
Se i numeri precedono il testo, la formula generica è:
SINISTRA(stringa,SOMMA(LUNGHEZZA(stringa)-LUNGHEZZA(SOSTITUISCI(stringa,{0,1,2,3,4,5,6,7,8,9},«»))))&"."&DESTRA(stringa,LUNGHEZZA(B13)- SOMMA(LUNGHEZZA(stringa)-LUNGHEZZA(SOSTITUISCI(stringa, {0,1,2,3,4,5,6,7,8,9}, «»))))
Utilizzando il caso precedente come esempio, applicare la seguente formula:
=LEFT(B13,SUM(LEN(B13)-LEN(SUBSTITUTE(B13,{0,1,2,3,4,5,6,7,8,9},«»))))&"."&DESTRA(B13,LUNGHEZZA(B13)- SOMMA(LUNGHEZZA(B13)-LUNGHEZZA(SOSTITUISCI(B13, {0,1,2,3,4,5,6,7,8,9}, «»))))
Premere il tasto Invio per ottenere il primo risultato, quindi trascinare la maniglia di riempimento automatico sulle altre celle per estendere la formula.
9,2 Aggiungere caratteri tra Dividi per testo e numero con Riempimento Automatico
Se utilizzi Excel 2013 o versioni successive, la funzione Riempimento Automatico può aiutarti ad aggiungere carattere(i) tra testo e numero.
Nella cella accanto ai dati originali, digitare manualmente il nuovo dato con il carattere(i) già inserito(i) tra Dividi per testo e numero. Premere quindi Invio per passare alla cella successiva al primo risultato.
Quindi premi i tasti Ctrl+E per attivare il Riempimento Automatico.
Estensione
Questa guida illustra anche alcuni scenari relativi a Aggiungi testo che potrebbero presentarsi nella vita quotidiana o nel lavoro.
A volte è necessario aggiungere separatori, come i trattini, a numeri di telefono o codici identificativi, come illustrato nello screenshot seguente. Digitare manualmente diventerebbe un’operazione noiosa e dispendiosa se si dovessero elaborare centinaia di numeri. In questa sezione ti presentiamo tre metodi rapidi per ottenere il risultato desiderato in modo efficiente.
10,1 Aggiungere trattini ai numeri mediante formula
Di seguito trovi due formule per aggiungere rapidamente trattini ai numeri. Per inserire trattini dopo la terza e la sesta cifra nella cella B3, utilizza una delle seguenti formule:
Funzione SOSTITUISCI
=REPLACE(REPLACE(B3,4,0,"-"),8,0,"-")
Funzione TESTO
=TEXT(B3,«???-???-??? »)
Premere il tasto Invio per ottenere il primo risultato, quindi trascinare la maniglia di riempimento automatico sulle altre celle.
Attenzione: Puoi personalizzare gli argomenti delle formule indicate sopra in base alle tue esigenze. Ad esempio, per aggiungere "-" dopo la seconda, la quarta e la sesta cifra, puoi utilizzare le seguenti formule: =REPLACE(REPLACE(REPLACE(B3,3,0,"-"),6,0,"-"),9,0,"-") =TEXT(B3,«??-??-??-??? ») |
10,2 Aggiungere trattini ai numeri con Imposta formato cella
Per aggiungere direttamente trattini ai numeri nelle celle originali, puoi usare la funzione Imposta formato cella.
1. Seleziona i numeri a cui desideri aggiungere i trattini, quindi premi Ctrl+1 per aprire la finestra di dialogo Imposta formato cella.
2. Nella finestra di dialogo Imposta formato cella, seleziona la scheda Numero, quindi scegli Personalizzato nella sezione Categoria.
3. Quindi, nella sezione Tipo, digita ###-###-### nella casella di testo e fai clic su OK.
I numeri selezionati ora presentano i trattini.
10,3 Aggiungere trattini a Numero di telefono con la funzione Aggiungi testo di Kutools per Excel
Se hai installato Kutools per Excel in Excel, la funzione Aggiungi testo può esserti d’aiuto.
1. Selezionare le celle contenenti i numeri a cui aggiungere trattini, quindi fare clic su Kutools>Testo>Aggiungi testo.
2. Nella finestra di dialogo Aggiungi testo, digita il trattino o un altro separatore nella casella di testo Testo, seleziona l'opzione Specifica e inserisci, nella casella sottostante, le posizioni dopo le quali desideri aggiungere i trattini, separate da virgole.
3. Fare clic su Ok o su Applica. I numeri selezionati avranno ora i trattini aggiunti.
Scarica gratuitamente Aggiungi testo per una prova gratuita di 30 giorni.
Immagina di avere un elenco di numeri con lunghezze diverse e di voler aggiungere zeri iniziali per uniformarne la lunghezza e ottenere un aspetto più ordinato, come mostrato nello screenshot seguente. Di seguito ti presentiamo due metodi semplici ed efficaci per farlo.
11,1 Aggiungere zeri iniziali alle celle con la funzione Imposta formato cella
Puoi utilizzare la funzione Imposta formato cella per definire un formato personalizzato e fissare la lunghezza della cella aggiungendo zeri iniziali.
1. Seleziona le celle a cui desideri aggiungere zeri iniziali, quindi premi Ctrl+1 per aprire la finestra di dialogo Imposta formato cella.
2. Nella finestra di dialogo Imposta formato cella, selezionare la scheda Numero, scegliere Personalizzatonella sezione Categoria.
3. Quindi, nella sezione Tipo, digitare 0000 nella casella di testo (per impostare una lunghezza di 4 cifre, inserisci 0000; puoi modificare la lunghezza, ad esempio per 5 cifre digita 00000) e fare clic su OK.
I numeri ora presentano zeri iniziali e hanno tutti la stessa lunghezza.
| AttenzioneSe la lunghezza dei dati originali supera quella impostata, verranno visualizzati i dati originali senza zeri iniziali. |
11,2 Aggiungere zeri iniziali a Formula
Se non si desidera modificare i dati originali, è possibile utilizzare una formula per aggiungere zeri iniziali ai numeri in altre celle.
Di seguito sono riportate tre funzioni utili a questo scopo.
Formula 1: funzione TESTO
TESTO(numero,«00…»)
Formula 2: funzione DESTRA
DESTRA(«00…»&numero,lunghezza)
Formula 3: funzione BASE
BASE(numero,10,lunghezza)
Il numero di zeri nella formula corrisponde alla lunghezza desiderata del numero.
Impostando una lunghezza di 4 cifre, utilizzare le seguenti formule:
=TEXT(B10,"0000")
=RIGHT("0000"&B10,4)
=BASE(B10,10,4)
Premere il tasto Invio e trascinare la maniglia di riempimento automatico verso il basso.
| Attenzione: se la lunghezza dei dati originali supera la lunghezza impostata, verranno visualizzati i dati originali senza zeri iniziali. |
Se si desidera aggiungere zeri finali ai numeri per ottenere una lunghezza fissa — ad esempio, trasformare i numeri nelle celle B3:B7 in sequenze di 5 cifre aggiungendo zeri alla fine, come mostrato nell’immagine seguente — è possibile utilizzare una formula apposita.
Funzione REPT
numero&REPT("0",lunghezza-LUNGHEZZA(numero))
Nella formula, l’argomento «numero» rappresenta il numero o un riferimento di cella al quale si desidera aggiungere zeri finali, mentre l’argomento «lunghezza» indica la lunghezza fissa desiderata.
Utilizzare la seguente formula:
=B3&REPT("0",5-LEN(B3))
Premere il tasto Invio e trascinare il quadratino di riempimento automatico verso il basso fino alle celle che richiedono questa formula.
Se si desidera esportare o copiare dati da un foglio di lavoro in un blocco note, i testi potrebbero risultare disallineati poiché i valori delle celle hanno lunghezze diverse; per renderli ordinati come mostrato nell’immagine seguente, occorre aggiungere spazi finali.
Per risolvere questo problema, la funzione REPT può fare al caso tuo.
SINISTRA(testo & REPT(« »,lunghezza_max),lunghezza_max)
Nella formula, l’argomento «testo» indica il testo o il riferimento di cella a cui aggiungere spazi finali, mentre «lunghezza_max» specifica la lunghezza fissa da assegnare ai testi, che deve essere maggiore o uguale alla lunghezza massima dei testi utilizzati.
Per aggiungere spazi finali ai testi nelle celle B3:C6, utilizzare la formula seguente:
=LEFT(B3 & REPT(« »,10),10)
Premere il tasto Invio, quindi trascinare il quadratino di riempimento automatico su tutte le celle che richiedono questa formula.
In questo caso, poiché il testo più lungo tra quelli utilizzati è composto da 9 caratteri, qui si utilizza 10. 
A volte è necessario aggiungere virgolette o parentesi attorno al testo o ai numeri nelle celle, come illustrato nell’immagine seguente. Oltre alla digitazione manuale, cella per cella, Excel offre due metodi rapidi per soddisfare questa esigenza.
14,1 Aggiungere virgolette/parentesi con Imposta formato cella
Se desideri aggiungere virgolette attorno al testo nei dati originali, la funzione “Imposta formato cella” di Excel può esserti utile.
1. Seleziona le celle a cui desideri aggiungere le virgolette, quindi premi i tasti Ctrl+1 per aprire la finestra di dialogo Imposta formato cella.
2. Nella finestra di dialogo Imposta formato cella, nella scheda Numero, seleziona Personalizzato dall’elenco di Categoria, quindi digita «''»@«''» nella casella Tipo nella sezione a destra. Fai clic su OK.
Il testo nelle celle selezionate è stato racchiuso tra virgolette.
Per aggiungere parentesi attorno al testo, nella casella Tipo della finestra di dialogo Imposta formato cella, utilizza (@).
14,2 Aggiungere virgolette/parentesi mediante formule
Anche le formule possono essere utilizzate per aggiungere virgolette al testo contenuto in altre celle.
Utilizzo del connettore &
«»«»&testo&«»«»
Oppure
caratt(34)&testo&caratt(34)
In questo caso, per il testo nella cella B11, utilizzare le seguenti formule:
=«»""&B11&""""
Oppure
=caratt(34)&B11&caratt(34)
Premere il tasto Invio e trascinare il quadratino di riempimento automatico verso il basso per compilare le celle.
Per aggiungere parentesi attorno al testo, utilizza la formula «(»&testo&«)».
14,3 Aggiungere virgolette/parentesi mediante VBA
Se è necessario ricorrere al codice VBA per risolvere questa operazione, di seguito è riportata una macro VBA.
1. Premere i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra visualizzata, fai clic su Inserisci > Modulo per inserire un nuovo modulo vuoto.
3. Copiare e incollare il codice VBA seguente nel nuovo modulo.
VBA: Aggiungere virgolette attorno ai testi
Sub addquotationmarksorbrackets()
'UpdatebyExtendOffice
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 = """" & Rng.Value & """"
Next
End Sub | Attenzione: nello script di codice,«»«» & Rng.Value & «»«»«(» & Rng.Value & «)».indica di aggiungere «» intorno ai testi; se si desidera aggiungere parentesi () intorno al testo, modificarlo in |

4. Premere il tasto F5 oppure fare clic sul pulsante Esegui
nella finestra per eseguire il codice VBA. Verrà visualizzata una finestra di dialogo per selezionare le celle a cui aggiungere le virgolette.
5. Fare clic su OK. Le virgolette sono state aggiunte automaticamente attorno al testo nelle celle selezionate.
A volte, per aiutare altri utenti a comprendere meglio i dati, potrebbe essere necessario Aggiungi testo nei risultati delle formule, come mostrato nell’immagine seguente. Per includere del testo all’interno di una formula, racchiudere il testo tra virgolette e utilizzare il connettore & per unirlo alla formula stessa.
Caso 1 Aggiungi testo prima della formula
«Oggi è »&TESTO(OGGI(),«gggg, mmmm gg.»)
Caso 2 Aggiungi testo dopola formula
TESTO(ORA(),«HH:MM:SS»)&« è l’orario corrente.»
Caso 3 Aggiungi testo su entrambi i lati della formula
«Oggi venduti »&dati&« kg.»
Altre guide su Excel: |
Combina più cartelle di lavoro o fogli di lavoro in un unico file Separa celle di testo, numeri e date (dividi in più colonne) Combina i contenuti di più celle senza perdere dati in Excel Confronta due colonne per trovare corrispondenze e differenze in Excel |
I migliori strumenti per la produttività in ufficio
Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività del 80 %
- Super Barra delle formule (modifica facilmente più righe di testo e formule); Layout di lettura (leggi e modifica con facilità un gran numero di celle); Incolla in Intervallo di filtro...
- Unisci celle/righe/colonne e conserva i dati; dividi il contenuto delle celle; combina righe duplicate e calcola somma/media…; previeni voci duplicate; confronta intervalli…
- Seleziona duplicati o valori univoci nelle righe; Seleziona righe vuote (tutte le celle sono vuote); Super Trova e ricerca fuzzy in molte cartelle di lavoro; selezione casuale…
- Copia esatta di celle multiple senza modificare i riferimenti delle formule; creazione automatica di riferimenti a più fogli; inserisci punti elenco, caselle di controllo e molto altro...
- Formule preferite e inserimento rapido, intervalli, grafici e immagini; crittografa le celle con password; crea un elenco di invio e invia email...
- Estrai testo, aggiungi testo, rimuovi caratteri da una posizione specifica, elimina spazi; crea e stampa statistiche dei dati della pagina; converti il contenuto delle celle in commenti e viceversa...
- Super Filtri (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese, settimana, giorno, frequenza e molto altro; Filtro speciale per grassetto, corsivo…
- Combina cartelle e fogli di lavoro; unisci tabelle in base a una colonna chiave; suddividi i dati in più fogli; converti in batch file xls, xlsx e PDF...
- Raggruppa la tabella pivot per numero di settimana, giorno della settimana e altro ancora...Mostra le celle sbloccate e blocca la selezione con colori diversi;Evidenzia le celle contenenti formule o nomi...
- 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, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e riduci centinaia di clic del mouse ogni giorno!

