Bước 1: Bạn chọn thẻ Developer rồi chọn Visual Basic hoặc bấm tổ hợp phím ALT + F11. Nếu là Laptop mà phím F có 2 chức năng thì phải bấm Fn + ALT + F11.
* Nếu Excel của bạn chưa hiện thẻ Developer thì hãy đọc bài viết này Cách bật hiện tab Developer trong Excel.
Bước 2: Trong trình VBA, bạn chọn Insert => Module
Bước 3: Trong module bạn nhập đoạn code sau vào.
Private Function TACHHOTEN(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
TACHHOTEN = Right(Name, Len(Name) - j)
Else
TACHHOTEN = Left(Name, j)
End If
Exit For
End If
Next
End Function
Sau đó bạn click thoát hoặc bấm ALT + Q để thoát
Bước 4: Bạn đặt con trỏ vào ô B3, nhập công thức =TACHHOTEN(A3;0) rồi gõ Enter. Sau đó bạn copy công thức xuống các ô bên dưới
Bước 5: Bạn đặt con trỏ vào ô C3, nhập công thức =TACHHOTEN(A3;1) rồi gõ Enter. Sau đó copy công thức xuống các ô bên dưới.