Jak wstawić / dodać spację po każdych x znakach w komórkach?
Jeśli masz wiele ciągów tekstowych na liście arkusza roboczego, teraz chcesz wstawić spację po każdych 3 lub x znakach w komórkach, jak pokazano na zrzucie ekranu. Jak możesz szybko i łatwo rozwiązać ten problem w programie Excel?
Wstaw / Dodaj spację po każdych x znakach w komórkach z kodem VBA Wstaw / Dodaj spację po każdych x znakach w komórkach za pomocą Kutools for Excel |
Wstaw / Dodaj spację po każdych x znakach w komórkach z kodem VBA
Stosując następujący kod VBA, możesz szybko wstawić spację po każdych n znakach dla wielu komórek naraz, wykonaj następujące czynności:
1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Następnie kliknij wstawka > Modułi wklej następujący kod w Moduł okno.
Kod VBA: wstaw spację po każdych x znakach:
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. Następnie naciśnij F5 klucz do uruchomienia tego kodu, aw polu zachęty wybierz komórki, do których chcesz wstawić spację, zobacz zrzut ekranu:
4. A następnie kliknij OK przycisk, a spacje zostały wstawione do zawartości komórki po każdych czterech znakach, patrz zrzuty ekranu:
Note: W powyższym kodzie możesz zmienić numer 4 do innej liczby, aby wstawić spację po. Możesz także zmienić przestrzeń separatora na inny separator w tej regule xTxt = Trim (xTxt) & „” & Mid (xStr, i, 4) powyższego kodu.
Wstaw / Dodaj spację po każdych x znakach w komórkach za pomocą Kutools for Excel
Kutools dla programu Excel'S Dodaj tekst Funkcja może również pomóc w szybkim i łatwym rozwiązaniu tego problemu.
Kutools dla programu Excel : z ponad 300 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni. |
Po zainstalowaniu Kutools dla programu Excelwykonaj następujące czynności :( Bezpłatne pobieranie Kutools dla programu Excel teraz! )
1. Wybierz ciągi tekstowe, w których chcesz wstawić spację.
2. Następnie kliknij Kutools > Tekst > Dodaj tekstzobacz zrzut ekranu:
3, w Dodaj tekst W oknie dialogowym naciśnij raz spację do Tekst i wybierz Sprecyzować opcja pod Pozycja, a następnie wpisz pozycje, które chcesz wstawić spację, zobacz zrzut ekranu:
4. A następnie kliknij Ok or Aplikuj przycisk, otrzymasz wynik, że spacje zostały wstawione po każdych czterech znakach, jak potrzebujesz.
Tips: Liczba pozycji w polu tekstowym Określanie powinna być oddzielona przecinkami.
Bezpłatne pobieranie Kutools dla programu Excel teraz!
Podobne artykuły:
Jak dodać / wstawić określony znak co x znaków do komórek?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!