Cách tách riêng Họ tên đệm & tên

[cadafi]

nhưng mình muốn hỏi 1 vấn đề nữa: khi tách tên ra rùi mình muốn xếp tên đó theo thứ tự abc và phần họ cũng đi cùng tương ứng với tên thì làm thế nào ????????

Trời! Thế khi bạn Sort dữ liệu bạn chỉ sort mỗi cột tên thôi sao! Phải chiếu sáng cả hai cột [Họ] và [Tên} rồi mới sort theo [Tên] chứ nhỉ!

 

[duongthanh_nhh]

bạn làm ơn chỉ cụ thể giúp mình đc ko ? thanks bạn nhiều

 

[bactu]

Bạn chọn hết tất cả vùng dữ liệu rồi chọn Data\Sort, chọn cột cần sort theo tăng dần hoặc giảm dần!

 

[Chuot Xinh]

e chưa hiểu. Trung Chinh chỉ bảo lại đi

 

[TrungChinhs]

e chưa hiểu. Trung Chinh chỉ bảo lại đi

Bạn chưa hiểu cái gì ? sao không gõ thêm vài từ nữa cho rõ. Nếu bạn muốn hỏi tôi về cách tách tên thì bạn tham khảo thêm 2 cách này

1.Tách ra 2 cột: Họ và đệm, tên

Sub TachChuoi_Cuoi()
Application.Calculation = 2
Application.ScreenUpdating = 0
On Error Resume Next
    For Each cls In [b5:b50000].SpecialCells(2)
       tmp = Split(cls, " ")
       cls.Replace " " & tmp(UBound(tmp)), "  " & tmp(UBound(tmp))
       tmp2 = Split(cls, "  ")
       For i = 1 To UBound(tmp2) + 1
            cls(1, i).Offset(, 1) = tmp2(i - 1)
       Next
    Next
    Cells.Replace "  ", " "
End Sub

2. Tách họ, tên, đệm ra từng cột

Sub TachChuoi()
Application.Calculation = 2
Application.ScreenUpdating = 0
On Error Resume Next
    For Each cls In [b5:b50000].SpecialCells(2)
        tmp = Split(cls, " ")
        For i = 1 To UBound(tmp) + 1
            cls(1, i).Offset(, 5) = tmp(i - 1)
        Next
    Next
End Sub

 

[Tran Mui]

Chủ đề này đã có nhiều, tôi thường dùng tiện ích của Thầy Phạm Văn Trung
trong đó có cả tách và gộp, ngoài ra còn nhiều tiện ích khác bạn lấy về dùng nhé