Xin chỉ dẫn về việc tách dữ liệu trong 1 cell thành 2 cell riêng

hands
09/12/2023
Excel Ứng Dụng

Chào các bạn,
Mình Xin các bạn hường dẫn cách tách dữ liệu trong 1 cell thành 2 cell kế bên nhau ( xin xem trong file đính kèm). Ví dụ 1 cell đầu tiên như sau:

" CẦU VỒNG KHUYẾT
Ai đã yêu một lần đều hạnh phúc với người mình yêu… "

Kết quả mong muốn của mình là thành 2 cell kề nhau:

" CẦU VỒNG KHUYẾT " "Ai đã yêu một lần đều …."

Mình đã muốn dùng Hàm TRIM hoặc TEXT to COLUMN để tách nhưng không biết kí tự để xuống hàng trong cell trên là gì ??( Vì dữ liệu gốc như thế )

D2 =LEFT(B2,SEARCH(CHAR(10),B2)-1)
C2 nhập =RIGHT(B2,LEN(B2)-LEN(D2)-1)

Các Bạn có thể giúp thêm 1 chút xíu nữa để bản in Karaoke được hoàn chỉnh…
Vì lời bài hát quá dài nên khi in ra chiếm rất nhiều trang…Nay mình muốn xóa bớt.
Ví dụ: "Nuốt nước mắt khẽ ôm em ấm lòng trong phút giây biệt ly…"
Mình sẽ lấy 5 từ tính từ bên trái sang: "Nuốt nước mắt khẽ ôm" —> kết quả.
Mình chỉ biết làm thủ công dùng TEXT to COLUMN tach ra thanh các từ riêng biệt(cột) qua khoang trắng SPACE, rồi dùng Column to TEXT trong Word để nối 5 cột lại. tuy ra kết quả mong muốn nhưng không chuyên tí nào… Bác nào có cao kiến giúp em cho trót để có vol Karaoke nhỏ gọn hat ở nhà.
Cám ơn tất cả…

Giả sử dữ liệu tại ô A1, bạn dùng công thức sau kết thúc bằng Ctrl + Shift +Enter nhé

=LEFT(A1,SMALL(IF(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)=" ",ROW(INDIRECT("1:"&LEN(A1))),""),5))

Nếu muốn đủ 5 từ thì làm tạm thế này

=LEFT(A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1)+1)+1)+1)+1)) & "…"

Hoặc thế này sẽ đẹp hơn tí khi in ra sẽ đều các hàng hơn

=LEFT(A1,FIND(" ",A1,25)) & "…"

Muốn xài sang tí nữa thì code nhé

Function tach(cell As Range, sotu As Byte)
Dim tam As Variant, kq As Variant, i As Long
tam = Split(cell, " ")
   For i = 0 To sotu 
     kq = kq & tam(i) & " "
  Next
tach = kq & "..."
End Function

Sau khi tách ra rồi, bạn chọn cột nào bị xuống dòng vì còn cái ký tự không mong muốn đó. Bấm Ctrl + H, trong hộp thoại Find bạn nhập: 010 ( nhớ ấn phím Alt trong khi nhập nhé. Bạn sẽ không nhìn thấy gì hiển thị khi nhập) tiếp theo chọn Replace All

Thêm 1 cách nữa là copy cột dữ liệu ra thêm 2 cột mới. Chọn 1 cột mới và thao tác thế này
Bấm Ctrl H, trong hộp Find nhập *010 ( nhớ đè phím Alt khi nhập 010 nhé) rồi bấm Replace All
Cột còn lại thì làm ngược lại 010*
Bạn nghiên cứu nhé

Cái này dân nhậu người ta nói rằng: "anh bạn này ở không quá hé, cái thằng Char(10) thịt nó ngay lúc tách ô cho nhẹ nhàng
]Nếu muốn đủ 5 từ thì làm tạm thế này =LEFT(A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1,FIND(" ",A1)+1)+1)+1)+1)) & "…"
Hoặc thế này sẽ đẹp hơn tí khi in ra sẽ đều các hàng hơn =LEFT(A1,FIND(" ",A1,25)) & "…"

Tới cái này, dân nhậu người ta cũng nói rằng: "anh bạn này ở không quá hé"
Muốn lấy 5 từ tính từ trái sang thì cứ phang nó một cái thế này xem sao, ( thí dụ dữ liệu ở , nhập chuẩn, không có khoảng trắng vô nghĩa)

=LEFT(A1,FIND("*",SUBSTITUTE(A1," ","*",5)))

Cái "*" thay thế bằng ký tự quái nào cũng được, miễn biết chắc em í không có trong dữ liệu

Khóa học SprinGO phù hợp

Ứng dụng AI và Chat GPT trong Quản trị nhân sự

Học xong khóa này, học viên có thể: Hiểu đúng bản chất AI, các nhóm AI phổ biến và cách AI “hoạt động” ở...

Xem khóa học

Chia sẻ: