Hướng dẫn excel add space every 2 characters - excel thêm khoảng trắng cứ sau 2 ký tự

Nếu bạn có nhiều chuỗi văn bản trong danh sách bảng tính, bây giờ, bạn muốn chèn không gian sau mỗi 3 hoặc x ký tự trong các ô như sau ảnh chụp màn hình hiển thị. Làm thế nào bạn có thể giải quyết vấn đề này trong Excel một cách nhanh chóng và dễ dàng?

Chèn / thêm không gian sau mỗi ký tự x trong các ô có mã VBA

Áp dụng mã VBA sau, bạn có thể nhanh chóng chèn không gian sau mỗi N ký tự cho nhiều ô cùng một lúc, vui lòng làm như sau:

1. Giữ các phím ALT + F11 để mở cửa sổ Microsoft Visual Basic cho các ứng dụng.. Hold down the ALT + F11 keys to open the Microsoft Visual Basic for Applications window.

2. Sau đó nhấp vào Chèn> Mô -đun và Dán mã sau vào cửa sổ Mô -đun.. Then click Insert > Module, and paste the following code in the Module window.

Mã VBA: Chèn không gian sau mỗi ký tự x:

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. Sau đó nhấn phím F5 để chạy mã này và trong hộp nhắc, vui lòng chọn các ô mà bạn muốn chèn không gian vào, xem ảnh chụp màn hình:. Then press F5 key to run this code, and in the prompt box, please select the cells that you want to insert space to, see screenshot:

4. Sau đó bấm vào nút OK và các không gian đã được chèn vào nội dung ô sau mỗi bốn ký tự, xem ảnh chụp màn hình:. And then click OK button, and the spaces have been inserted into the cell contents after every four characters, see screenshots:

Lưu ý: Trong mã trên, bạn có thể thay đổi số 4 thành số khác để chèn không gian sau. Và bạn cũng có thể thay đổi không gian Delimiter sang một dấu phân cách khác trong quy tắc này = trim (xtxt) & "" & mid (xstr, i, 4) của mã trên.: In the above code, you can change the number 4 to other number to insert space after. And also you can change the delimiter space to another delimiters in this rule xTxt = Trim(xTxt) & " " & Mid(xStr, i, 4) of the above code.

Chèn / thêm không gian sau mỗi ký tự x trong các ô với kutools cho excel

Kutools cho tính năng văn bản thêm Excel, cũng có thể giúp bạn giải quyết vấn đề này một cách nhanh chóng và dễ dàng.’s Add Text feature also can help you to solve this problem quickly and easily.

Sau khi cài đặt Kutools cho Excel, vui lòng làm như sau :( Tải xuống miễn phí Kutools cho Excel ngay bây giờ!)Kutools for Excel, please do as follows:( Free Download Kutools for Excel Now!)

1. Chọn các chuỗi văn bản mà bạn muốn chèn không gian.. Select the text strings that you want to insert space.

2. Sau đó nhấp vào Kutools> Text> Thêm văn bản, xem ảnh chụp màn hình:. Then click Kutools > Text > Add Text, see screenshot:

3. Trong hộp thoại Thêm văn bản, nhấn thanh không gian một lần vào hộp văn bản và chọn tùy chọn Chỉ định trong vị trí, sau đó nhập các vị trí mà bạn muốn chèn không gian, xem ảnh chụp màn hình:. In the Add Text dialog box, press the space bar once into the Text box, and select the Specify option under the Position, then type the positions that you want to insert the space, see screenshot:

4. và sau đó nhấp vào nút OK hoặc áp dụng nút, bạn sẽ nhận được kết quả rằng các khoảng trống đã được chèn sau mỗi bốn ký tự khi bạn cần.. And then click Ok or Apply button, you will get the result that the spaces have been inserted after every four characters as you need.

Mẹo: Số lượng vị trí trong chỉ định hộp văn bản phải được phân tách bằng dấu phẩy.: The number of positions in Specify textbox should be separated by commas.

Tải xuống miễn phí Kutools cho Excel ngay bây giờ!

Bài viết liên quan:

Làm thế nào để thêm / chèn một số ký tự nhất định mỗi ký tự x vào các ô?

Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng năng suất của bạn lên 80%

• Tái sử dụng: nhanh chóng chèn các công thức phức tạp, biểu đồ & nbsp; và bất cứ điều gì bạn đã sử dụng trước đây; Mã hóa các ô bằng mật khẩu; Tạo danh sách gửi thư và gửi email ...: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
• Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Đọc bố cục (dễ dàng đọc và chỉnh sửa số lượng lớn các ô); Dán vào phạm vi được lọc ... (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
• Hợp nhất các ô/hàng/cột mà không mất dữ liệu; Chia nội dung tế bào; Kết hợp các hàng/cột trùng lặp ... Ngăn chặn các ô trùng lặp; So sánh phạm vi ... without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
• Chọn các hàng trùng lặp hoặc độc đáo; Chọn các hàng trống (tất cả các ô trống); Siêu tìm và mờ tìm trong nhiều sách bài tập; Chọn ngẫu nhiên ... Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
• Sao chép chính xác nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tham chiếu đến nhiều tờ; Chèn đạn, hộp kiểm và nhiều hơn nữa ... Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
• Trích xuất văn bản, thêm văn bản, xóa theo vị trí, loại bỏ không gian; Tạo và in các phần phụ phân trang; Chuyển đổi giữa nội dung ô và bình luận ..., Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
• Siêu bộ lọc (lưu và áp dụng các sơ đồ lọc cho các bảng khác); Sắp xếp nâng cao theo tháng/tuần/ngày, tần suất và nhiều hơn nữa; Bộ lọc đặc biệt của in đậm, nghiêng ... (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
• Kết hợp sách bài tập và bảng tính; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều tờ; Batch Chuyển đổi XLS, XLSX và PDF ...; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
• Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office/Excel 2007-2019 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ các tính năng dùng thử miễn phí 30 ngày. Đảm bảo hoàn lại tiền 60 ngày.. Supports Office/Excel 2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.

Tab Office mang giao diện được lập bảng đến văn phòng và làm cho công việc của bạn dễ dàng hơn nhiều

• Kích hoạt chỉnh sửa và đọc theo bảng trong Word, Excel, PowerPoint, Nhà xuất bản, Truy cập, Visio và Dự án., Publisher, Access, Visio and Project.
• Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
• Tăng năng suất của bạn lên 50%và giảm hàng trăm lần nhấp chuột cho bạn mỗi ngày!

Làm thế nào để bạn đặt một khoảng trống giữa hai chữ cái trong Excel?

Làm cách nào để thêm một dấu hai chấm vào hai ký tự trong Excel?

Làm cách nào để thêm không gian bổ sung trong Excel?