Come inserire / aggiungere spazio dopo ogni x caratteri nelle celle?
Se hai più stringhe di testo in un elenco di fogli di lavoro, ora, vuoi inserire uno spazio dopo ogni 3 o x caratteri nelle celle come mostrato nella seguente schermata. Come hai potuto risolvere questo problema in Excel in modo rapido e semplice?
Inserisci / Aggiungi spazio dopo ogni x caratteri nelle celle con codice VBA Inserisci / Aggiungi spazio dopo ogni x caratteri nelle celle con Kutools per Excel |
Inserisci / Aggiungi spazio dopo ogni x caratteri nelle celle con codice VBA
Applicando il seguente codice VBA, puoi inserire rapidamente lo spazio dopo ogni n caratteri per più celle contemporaneamente, per favore fai come segue:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Quindi fare clic inserire > Modulie incolla il codice seguente nel file Moduli finestra.
Codice VBA: inserisci uno spazio dopo ogni x caratteri:
Sub addspace()
'updateby Extendoffice
Dim i As Long
Dim xCell As Range
Dim xRg As Range
Dim xTxt As String
Dim xStr As String
Dim xUpdate As Boolean
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
xStr = xCell.Text
xTxt = ""
For i = 1 To Len(xStr) Step 4
If xTxt = "" Then
xTxt = Mid(xStr, i, 4)
Else
xTxt = Trim(xTxt) & " " & Mid(xStr, i, 4)
End If
Next
xCell = xTxt
Next
Application.ScreenUpdating = xUpdate
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e nella casella del messaggio, selezionare le celle in cui si desidera inserire lo spazio, vedere screenshot:
4. E poi clicca OK pulsante e gli spazi sono stati inseriti nel contenuto della cella dopo ogni quattro caratteri, vedi screenshot:
Note:: Nel codice sopra, puoi cambiare il numero 4 ad un altro numero per inserire uno spazio dopo. Inoltre, in questa regola puoi modificare lo spazio del delimitatore con un altro delimitatore xTxt = Trim (xTxt) & "" & Mid (xStr, i, 4) del codice sopra.
Inserisci / Aggiungi spazio dopo ogni x caratteri nelle celle con Kutools per Excel
Kutools for Excel'S aggiungi testo La funzione può anche aiutarti a risolvere questo problema in modo rapido e semplice.
Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, per favore fai come segue :( Scarica subito Kutools per Excel! )
1. Seleziona le stringhe di testo in cui desideri inserire spazio.
2. Quindi fare clic Kutools > Testo > aggiungi testo, vedi screenshot:
3. Nel aggiungi testo finestra di dialogo, premere una volta la barra spaziatrice nel file Testo casella e seleziona il file Specificare opzione sotto il Posizione, quindi digita le posizioni in cui desideri inserire lo spazio, vedi screenshot:
4. E poi clicca Ok or APPLICA pulsante, otterrai il risultato che gli spazi sono stati inseriti dopo ogni quattro caratteri di cui hai bisogno.
Suggerimenti:: Il numero di posizioni nella casella di testo Specifica deve essere separato da virgole.
Scarica subito Kutools per Excel!
Articolo correlato:
Come aggiungere / inserire determinati caratteri ogni x caratteri nelle celle?
I migliori strumenti per la produttività in ufficio
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...
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!