Jak přidat mezeru mezi jménem a příjmením v aplikaci Excel?
Zde je seznam jmen, která potřebují přidat prostor k jejich oddělení, jak je uvedeno níže, jak to můžete rychle vyřešit?
Přidejte mezeru mezi jménem a příjmením pomocí definované funkce
Přidejte mezeru mezi jménem a příjmením pomocí funkce Přidat text
Přidejte mezeru mezi jménem a příjmením pomocí definované funkce
Chcete-li přidat mezeru mezi křestním jménem a příjmením, můžete použít pouze a Definovaná funkce řešit v aplikaci Excel.
1. lis Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.
2. cvaknutí Vložit > Modula vložte níže uvedený kód do prázdného skriptu.
Kód: Přidejte mezeru mezi názvy
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. Uložte kód a zavřete Aplikace v okně vyberte prázdnou buňku a zadejte tento vzorec = AddSpaces (A1), pak přetáhněte popisovač automatického vyplňování přes buňky, na které chcete použít tento vzorec.
Přidejte mezeru mezi jménem a příjmením pomocí funkce Přidat text
Pokud nejste obeznámeni s definovanou funkcí, můžete se přihlásit Kutools for ExcelJe doplnit text nástroj pro rychlé přidání mezery mezi křestním jménem a příjmením.
Po instalaci Kutools for Excel, udělejte prosím jak je uvedeno níže :(Stažení zdarma Kutools for Excel Nyní!)
1. Vyberte buňky, do kterých chcete přidat mezery, klepněte na Kutools > Text > doplnit text. Viz snímek obrazovky:
2.V doplnit text dialogové okno, zadejte prostor do Text políčko, zaškrtněte Pouze přidat do vyberte možnost Před velkými písmeny z rozevíracího seznamu. Viz snímek obrazovky:
3. cvaknutí Ok or Podat žádost, nyní byla před každé velké písmeno přidána mezera. Viz snímek obrazovky:
Přidejte mezery mezi názvy
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své excelentní dovednosti pomocí Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab Přináší rozhraní s kartami do Office a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
