Cum se adaugă spațiu între prenume și prenume în Excel?
Iată o listă de nume care trebuie să adauge spațiu pentru a le separa, așa cum se arată în imaginea de mai jos, cum o puteți rezolva rapid?
Adăugați spațiu între prenume și prenume cu Funcție definită
Adăugați spațiu între prenume și prenume cu Adăugare text
Adăugați spațiu între prenume și prenume cu Funcție definită
Pentru a adăuga spațiu între prenume și prenume, puteți aplica doar un Funcție definită pentru a rezolva în Excel.
1. presa Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Moduleși lipiți codul de mai jos pe scriptul gol.
Cod: Adăugați spațiu între nume
Function AddSpaces(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
AddSpaces = xOut
End Function
3. Salvați codul și închideți aplicatii fereastra, selectați o celulă goală și introduceți această formulă = AddSpaces (A1), apoi trageți mânerul de completare automată peste celulele pe care doriți să le aplicați această formulă.
Adăugați spațiu între prenume și prenume cu Adăugare text
Dacă nu sunteți familiarizați cu funcția definită, puteți aplica Kutools for Excel'S Adăuga text utilitar pentru a adăuga rapid spațiu între prenume și prenume.
După instalare Kutools for Excel, vă rugăm să faceți ca mai jos:(Descărcare gratuită Kutools for Excel Acum!)
1. Selectați celulele pe care doriți să adăugați spații, faceți clic pe Kutools > Text > Adăuga text. Vedeți captura de ecran:
2.În Adăuga text dialog, introduceți un spațiu în Text casetă, bifați Adăugați numai la și selectați Înainte de majuscule din lista derulantă. Vedeți captura de ecran:
3. clic Ok or Aplică, acum a fost adăugat un spațiu înaintea fiecărei litere mari. Vedeți captura de ecran:
Adăugați spații între nume
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools for Excelși experimentați eficiența ca niciodată înainte. Kutools for Excel Oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Office Tab Aduce interfața cu file la Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
