Bỏ qua nội dung chính

Làm thế nào để tách văn bản thành các cột riêng biệt bằng chữ in hoa trong Excel?

doc chia theo vốn 1

Giả sử, bạn có một dải dữ liệu mà bạn muốn chia nội dung ô thành các cột riêng biệt bằng chữ in hoa như ảnh chụp màn hình sau đây, bạn có ý tưởng hay nào để giải quyết vấn đề này trong Excel không?

Chia văn bản thành các cột riêng biệt bằng chữ in hoa với các công thức

Chia văn bản thành các cột riêng biệt bằng chữ in hoa với mã VBA

Chia văn bản thành các cột riêng biệt bằng chữ hoa với Kutools cho Excel


Nếu chỉ có hai từ trong ô của bạn, các công thức sau sẽ giúp bạn hoàn thành công việc này. Vui lòng làm như sau:

1. Nhập công thức mảng này: =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 là ô mà bạn muốn tách bằng chữ in hoa) vào một ô trống liền kề với dữ liệu của bạn, rồi nhấn Ctrl + Shift + Enter các phím với nhau để lấy từ đầu tiên, xem ảnh chụp màn hình:

doc chia theo vốn 2

2. Sau đó chọn C2 và kéo chốt điền xuống các ô bạn muốn áp dụng công thức này, tất cả các từ đầu tiên của các ô phạm vi đã được trích xuất cùng một lúc, xem ảnh chụp màn hình:

doc chia theo vốn 3

3. Tiếp tục nhập một công thức khác: = REPLACE (A2,1, LEN (C2), "") (A2 là ô mà bạn muốn tách và C2 là ô chứa từ đầu tiên mà bạn đã trả về) vào ô D2 và nhấn đăng ký hạng mục thi phím để lấy từ thứ hai, xem ảnh chụp màn hình:

doc chia theo vốn 4

4. Chọn ô D2, kéo chốt điền xuống các ô để có từ thứ hai và nội dung ô của phạm vi đã được chia thành hai cột bằng chữ in hoa, xem ảnh chụp màn hình:

doc chia theo vốn 5


Các công thức trên chỉ được áp dụng cho giá trị ô chứa hai từ, nếu có nhiều từ trong một ô cần được tách, bạn có thể thêm dấu cách trước các chữ in hoa, sau đó áp dụng Văn bản thành Cột để chia nội dung ô thành phân tách các cột theo khoảng trắng.

Đầu tiên, áp dụng mã VBA để thêm dấu cách trước chữ hoa để phân tách các từ.

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Chèn dấu cách trước mỗi chữ cái viết hoa trong một ô

Function SplitWords(ByVal Str As String) As String
'updateby Extendoffice 20151128
    Dim I As Integer
    SplitWords = Left(Str, 1)
    For I = 2 To Len(Trim(Str))
        If (Asc(Mid(Str, I, 1)) > 64) And _
           (Asc(Mid(Str, I, 1)) < 91) And _
           (Mid(Str, I - 1, 1) <> " ") Then _
            SplitWords = SplitWords & " "
        SplitWords = SplitWords & Mid(Str, I, 1)
    Next
End Function

3. Lưu và đóng mã này, quay lại trang tính, vui lòng nhập công thức này: = chia tách (A2) vào một ô trống liền kề với dữ liệu của bạn, xem ảnh chụp màn hình:

doc chia theo vốn 6

4. Sau đó, kéo chốt điền xuống các ô mà bạn muốn áp dụng công thức này và các khoảng trắng đã được chèn trước mỗi chữ cái viết hoa để tách nội dung ô, xem ảnh chụp màn hình:

doc chia theo vốn 7

5. Và sau đó, bạn nên sao chép và dán các ô công thức này làm giá trị để xóa công thức ở một nơi khác hoặc phạm vi ban đầu.

doc chia theo vốn 8

Thứ hai, áp dụng tính năng Văn bản thành Cột để chia nội dung ô thành các cột riêng biệt theo khoảng trắng.

6. Chọn các giá trị ô bạn đã chèn khoảng trắng và nhấp vào Ngày > Văn bản thành Cột, trong Bước 1 của Trình hướng dẫn chuyển đổi văn bản thành cột, lựa chọn Phân cách tùy chọn, xem ảnh chụp màn hình:

doc chia theo vốn 9

7. Sau đó nhấn vào Sau trong Bước 2 của trình hướng dẫn, hãy kiểm tra Không gian tùy chọn theo Dấu phân cách , xem ảnh chụp màn hình:

doc chia theo vốn 10

8. Tiếp tục nhấp Sau trong Bước 3 của trình hướng dẫn, hãy chọn Tổng Quát tùy chọn theo Định dạng dữ liệu cột, và sau đó chọn một ô mà bạn muốn đặt các giá trị tách bằng cách bấm vào doc chia theo vốn 12 nút, xem ảnh chụp màn hình:

doc chia theo vốn 11

9. Cuối cùng, hãy nhấp vào Kết thúc , nội dung ô đã được chia thành nhiều cột như ảnh chụp màn hình sau:

doc chia theo vốn 13


Nếu bạn có Kutools cho Excel, kết hợp nó thêm văn bảnChia ô , bạn có thể giải quyết công việc này một cách dễ dàng và thoải mái, vui lòng làm như sau:

Kutools cho Excel : với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày.

1. Chọn dữ liệu gốc mà bạn muốn tách.

2. Sau đó nhấn vào Kutoolsbản văn > thêm văn bản, xem ảnh chụp màn hình:

3. Trong thêm văn bản hộp thoại, vui lòng nhập phím cách một lần hoặc bất kỳ dấu phân cách nào khác mà bạn cần vào bản văn hộp, và sau đó chọn Chữ cái thứ 1 là chữ hoa từ Chỉ thêm vào , xem ảnh chụp màn hình:

doc chia theo vốn 15

4. Sau đó nhấn vào Ok và dấu cách đã được thêm vào trước mỗi chữ cái viết hoa, xem ảnh chụp màn hình:

doc chia theo vốn 16

5. Và sau đó bạn có thể áp dụng Chia ô tiện ích của Kutools cho Excel để chia các giá trị ô theo không gian, giữ cho phạm vi dữ liệu được chọn và sau đó nhấp vào Kutools > Hợp nhất & Tách > Chia ô, xem ảnh chụp màn hình:

6. Trong Chia ô hộp thoại, chọn Chia thành các cột theo Kiểu phần và kiểm tra Không gian hoặc các dấu phân cách khác mà bạn đã thêm ở Bước 3, hãy xem ảnh chụp màn hình:

doc chia theo vốn 18 18

7. Sau đó nhấn vào Okvà một hộp nhắc xuất hiện để nhắc bạn chọn một ô để đặt dữ liệu tách, xem ảnh chụp màn hình:

doc chia theo vốn 19

8. Cuối cùng, hãy nhấp vào OK và bạn sẽ nhận được kết quả mình cần, xem ảnh chụp màn hình:

doc chia theo vốn 20

Tải xuống và dùng thử miễn phí Kutools cho Excel ngay!


Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. Tải xuống và dùng thử miễn phí ngay!

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

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian.  Bấm vào đây để có được tính năng bạn cần nhất...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và 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 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hola! Llevo todo el dia tratando de divir palabras juntas en celdas en excel, he dado con esta pagina, pero el código VBA no me funciona, tengo entendido que =Splitwords ya no esta disponible.
Es posible que puedas ayudarme?
This comment was minimized by the moderator on the site
Formula/function works as it should now, a later amendment (#25891) fixed it - thank you so much
This comment was minimized by the moderator on the site
DanMorgan = Dan
MollieClark = Mollie
Jade, Jam, Ryan, Dummy (not his real name),Jess,Cass, Jenni and Jack all come through as Jade,Jam, etc

using Excel 2013 (company supplied)
This comment was minimized by the moderator on the site
I need some help splitting a cell. I can do it by lower case next to upper case. But if the splitting word is one capitol letter, followed by another capitol letter it won't work. Also, if there are Roman numerals involved there are problems. If there is a word, such as "McDonald" or "MacDonald" there are problems. Can you help?
This comment was minimized by the moderator on the site
This doesn't work for two of the same capital letters
This comment was minimized by the moderator on the site
Hello,
If the two words are same words, please change the first array formula to the follows:
=LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),RIGHT(A2, LEN(A2)-1)&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),1))

Please remember to press Ctrl + Shift + Enter keys together.

Hope it can help you!
This comment was minimized by the moderator on the site
Thanks for the content it really worked
This comment was minimized by the moderator on the site
Your formula fail if name is like this: JhonJhon MarkMark
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations