Lâu lâu cũng có một số bạn hỏi tôi làm thế nào để tách các hàm họ và tên trong excel, thật ra kiến thức này hầu như chúng ta đã được học trong chương trình “tinh học căn bản” nhưng cũng có người quên chứ đúng không :D.
Từ file EXCEL có chứa dữ liệu bạn đang muốn tách họ và tên – bạn hãy nhấn Alt + F11 sau đó nhấn insert nhấn module dán đọan mã sau vào trong cửa sổ module:
Private Function Tachten(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
Tachten = Right(Name, Len(Name) – j)
Else
Tachten = Left(Name, j)
End If
Exit For
End If
Next
End Function
SỬ DỤNG HÀM TÍNH TÁCH HỌ VÀ TÊN:
Giả sử bạn muốn tách tên ra khỏi họ và họ đệm tại ô A1 = Trần Trung Nghĩa / Gõ = tachten(A1,0) / Kết quả: Trung Nghĩa
Giả sử bạn muốn tách tên ra khỏi họ và họ đệm tại ô A1 = Trung Nghĩa / Gõ = tachten(A1,1) / Kết quả: Nghĩa
- Tìm điện thoại bằng tiếng huýt sáo
- In và thiết kế bao bì giấy với những đam mê và sáng tạo
- Dịch Vụ Chụp Hình Cưới Trọn Gói, Tặng Clip Chuyên Nghiệp
- In băng rôn và bảng hiệu quảng cáo chuyên nghiệp
- Bí quyết ngăn ngừa và điều trị nám da hiệu quả
- Cầu vượt 5 tầng 20 làn đường như trận đồ bát quái ở Trung Quốc
- In backlit film với máy in phun màu hiện đại
- Dịch vụ in ấn trên gỗ với công nghệ in hiện đại
- Khó lòng bỏ qua những món ăn nổi tiếng ở quận 1
- In Voucher theo yêu cầu của doanh nghiệp
- Công Ty In Ấn Cao Thời Đại – Dịch vụ in hiflex bạt hiflex In thẻ nhựa uy tín tại quận 11 TP.HCM {{ 0903 920 999 }}
- In ấn lên bình ắc quy các loại