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 for 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 for 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 gratis Kutools for Excel Adesso! )
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 gratis Kutools for Excel Adesso!
Articolo correlato:
Come aggiungere / inserire determinati caratteri ogni x caratteri nelle celle?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze in Excel con Kutools for Excele sperimenta l'efficienza come mai prima d'ora. Kutools for 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 rende il tuo lavoro molto più semplice
- 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!
