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:

Uwagi: 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.

Przejdź do pobierania Bezpłatna wersja próbna 30 dniZakup PayPal / MyCommerce

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 Zastosuj przycisk, otrzymasz wynik, że spacje zostały wstawione po każdych czterech znakach, jak potrzebujesz.

Wskazówki: 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?