Bước 1: Đầu tiên muốn tách họ tên thì các bạn cần tạo thêm hai cột đó là cột Họ & Đệm và cột thứ hai là cột Tên. Tiếp theo các bạn sao chép dữ liệu trong cột Họ và Tên sang cột Tên.
Bước 2: Thực hiện tách tên trong cột Tên.
Xuất hiện hộp thoại Find & Replace, trong thẻ Replace các bạn nhập “* “ (dấu sao và dấu cách) trong ô Find what, ô Relace with bỏ qua không nhập. Sau đó nhấn chọn Replace All để tách tên.
Trong ô đầu tiên của cột Họ & Đệm các bạn nhập công thức hàm
Với B5 là ô trong cột Họ và Tên, D5 là ô trong cột Tên.
Sau khi đã tách được Họ & Đệm của ô đầu tiên, các bạn sao chép công thức hàm xuống các ô khác để tách Họ & Đệm của tất cả các tên.
CÁCH 2: TÁCH HỌ TÊN SỬ DỤNG HÀM
Các bạn chọn ô đầu tiên của cột Tên và nhập công thức hàm
=RIGHT(B5;LEN(B5)-FIND(“*”;SUBSTITUTE(B5;” “;”*”;LEN(B5)-LEN(SUBSTITUTE(B5;” “;””)))))
Với B5 là họ và tên đầy đủ trong cột Họ và Tên cần tách tên. Để hiểu hàm tách tên này các bạn cần hiểu được cách sử dụng từng hàm, các bạn có thể tham khảo các bài viết về hàm RIGHT; LEN; FIND; SUBSTITUTE.
Như vậy các bạn đã tách được tên cho dữ liệu đầu tiên.
Các bạn sao chép công thức hàm xuống các ô phía dưới để tách các tên trong dữ liệu còn lại.
Bước 3: Tách họ và đệm sang cột Họ & Đệm.
Các bạn thực hiện tách họ và đệm tương tự như cách 1, đó là nhập hàm =LEFT(B5;LEN(B5)-LEN(D5)) với B5 là họ tên đầy đủ, D5 là tên vừa tách. Như vậy các bạn sẽ tách được họ và đệm.
Sao chép công thức hàm cho các ô còn lại các bạn sẽ được kết quả như sau:
Trong Excel Options các bạn chọn Customize Ribbon ở menu bên trái, đánh dấu tích chọn trong ô vuông trước Developer trong phần Main Tabs và nhấn OK.
Private Function TACH(ten As String, lg As Integer) Dim j As Integer Name = Trim(ten) For j = Len(Name) To 1 Step -1 If Mid(Name, j, 1) = " " Then If lg = "1" Then TACH = Right(Name, Len(Name) - j) Else TACH = Left(Name, j) End If Exit For End If Next End FunctionBước 4: Lưu Module lại bằng cách chọn biểu tượng Save hoặc tổ hợp phím Ctrl + S và đóng cửa sổ Microsoft Visual Basic.
Bước 5: Tách họ và đệm từ họ và tên đầy đủ.
Đầu tiên các bạn cũng tạo hai cột Họ & Đệm và cột Tên, tiếp theo trong ô đầu tiên của cột Họ & Đệm và nhập hàm =TACH(B5;0) với B5 là họ và tên đầy đủ. Nhấn Enter để Module thực hiện hàm tách họ và đệm.
Với các họ và đệm khác các bạn thực hiện sao chép công thức hàm TACH xuống.
Bước 6: Tách tên ra khỏi họ và tên đầy đủ.
Tại ô đầu tiên của cột Tên các bạn nhập hàm =TACH(B5;1) với B5 là họ và tên đầy đủ. Sau đó nhấn Enter, như vậy Module sẽ được chạy và tách tên.
Sao chép công thức hàm TACH xuống các ô còn lại các bạn sẽ được kết quả như sau: