Hỏi đáp : cách tách họ tên đệm lót những tên dài (3 chữ 4 chữ 5 chữ)

[bitun1991]

Chào các chuyên gia,

em đang vướng mắc làm sao có thể tách được tên dài 4 chữ 5 chữ
em muốn tách như mẫu ví dụ bên dưới mọi người viết giúp em 3 code này được ko ạ?
ví dụ

3 chữ: Nguyễn Thanh Tùng -> Nguyễn / Thanh / Tùng
4 chữ: Nguyễn Hoàng Thanh Tùng --> Nguyễn Hoàng/Thanh /Tùng
5 chữ: Nguyễn Hoàng Văn Thanh Tùng ---> Nguyễn Hoàng Văn /Thanh/Tùng

Tên thì trong cột sẽ ngẫu nhiên 3,4,5 chữ mình chỉ việc đánh vào là nó tự nhận biết và tách ra như mẫu trên.

có thể hàm sẽ ko sử dụng được nếu có vba thì mn cũng giúp em giải với nhé.



em cảm ơn

 

[snow25]

Chào các chuyên gia,

em đang vướng mắc làm sao có thể tách được tên dài 4 chữ 5 chữ
em muốn tách như mẫu ví dụ bên dưới mọi người viết giúp em 3 code này được ko ạ?
ví dụ

3 chữ: Nguyễn Thanh Tùng -> Nguyễn / Thanh / Tùng
4 chữ: Nguyễn Hoàng Thanh Tùng --> Nguyễn Hoàng/Thanh /Tùng
5 chữ: Nguyễn Hoàng Văn Thanh Tùng ---> Nguyễn Hoàng Văn /Thanh/Tùng

Tên thì trong cột sẽ ngẫu nhiên 3,4,5 chữ mình chỉ việc đánh vào là nó tự nhận biết và tách ra như mẫu trên.

có thể hàm sẽ ko sử dụng được nếu có vba thì mn cũng giúp em giải với nhé.



em cảm ơn

File đâu ta.Có 2 chữ với 1 chữ tính sao.

 

[tam888]

Chào các chuyên gia,

em đang vướng mắc làm sao có thể tách được tên dài 4 chữ 5 chữ
em muốn tách như mẫu ví dụ bên dưới mọi người viết giúp em 3 code này được ko ạ?
ví dụ

3 chữ: Nguyễn Thanh Tùng -> Nguyễn / Thanh / Tùng
4 chữ: Nguyễn Hoàng Thanh Tùng --> Nguyễn Hoàng/Thanh /Tùng
5 chữ: Nguyễn Hoàng Văn Thanh Tùng ---> Nguyễn Hoàng Văn /Thanh/Tùng

Tên thì trong cột sẽ ngẫu nhiên 3,4,5 chữ mình chỉ việc đánh vào là nó tự nhận biết và tách ra như mẫu trên.

có thể hàm sẽ ko sử dụng được nếu có vba thì mn cũng giúp em giải với nhé.



em cảm ơn

Thế nếu là
Hoàng Tùng
thì sao?

 

[dovanhoc84]

Chắc hiếm có ai tên nhiều hơn 6 chữ nên mình làm cái này. xem công thức ở cột B

 

[VetMini]

Thế nếu là
Hoàng Tùng
thì sao?

Thế nếu là 6 chữ:
Bằng Đai Múc Lột Hơi Nai
thì sao?

 

[befaint]

Tên của hai người này thì tách kiểu gì nhỉ?

Lê Hoàng Hiếu Nghĩa Đệ Nhất Thương Tâm Nhân

Đào Thị Long Lanh Kim Ánh Dương.

 

[VetMini]

Tên của hai người này thì tách kiểu gì nhỉ?

Lê Hoàng Hiếu Nghĩa Đệ Nhất Thương Tâm Nhân

Đào Thị Long Lanh Kim Ánh Dương.

Tách ra kiểu như vầy:
Sọt Rác Đầy Khiến Bài Không / Bị / Chuyển
Chuyên Gia Đang Lúc Đói Bài Nên / Bất / Kể

 

[SA_DQ]

Tách ra kiểu như vầy:
Sọt Rác Đầy Khiến Bài Không / Bị / Chuyển
Chuyên Gia Đang Lúc Đói Bài Nên / Bất / Kể

Nhưng nên xài VBA mới đặng!

 

[dovanhoc84]

đây thưa các bác rảnh nghĩ ra tên quá dài, nhiêu kí tự cũng được.

 

[ptm0412]

đây thưa các bác rảnh nghĩ ra tên quá dài, nhiêu kí tự cũng được.

Để loại bỏ ký tự trắng thừa, dùng hàm Trim của Excel thay cho Trim của VBA, không cần tốn thêm 1 vòng lặp

 

[dovanhoc84]

Để loại bỏ ký tự trắng thừa, dùng hàm Trim của Excel thay cho Trim của VBA, không cần tốn thêm 1 vòng lặp

Nghĩa là sao ạ? Nếu chỉ trên excel thì chỉ tách bỏ trắng thừa nhưng k thể tách họ tên rồi thêm kí tự

 

[Phuocam]

Dùng hàm trim của Application.

Public Function tach(s As String) As String
Dim i As Long, k
s = Application.Trim(s)
i = InStrRev(s, " ")
Do While i > 0 And k < 2
    Mid(s, i, 1) = "/"
    k = k + 1
   i = InStrRev(s, " ")
Loop
  tach = s
End Function

 

[VetMini]

Dùng hàm trim của Application.

Public Function tach(s As String) As String
Dim i As Long, k
s = Application.Trim(s)
i = InStrRev(s, " ")
Do While i > 0 And k < 2
    Mid(s, i, 1) = "/"
    k = k + 1
   i = InStrRev(s, " ")
Loop
  tach = s
End Function

Code này chỉ thay 2 dấu cách cuối cùng. Không đúng với yêu cầu của thớt. (*)

...ví dụ

3 chữ: Nguyễn Thanh Tùng -> Nguyễn / Thanh / Tùng
4 chữ: Nguyễn Hoàng Thanh Tùng --> Nguyễn Hoàng/Thanh /Tùng
5 chữ: Nguyễn Hoàng Văn Thanh Tùng ---> Nguyễn Hoàng Văn /Thanh/Tùng
...

Trường hợp 3 chữ: giữ lại dấu cách ở hai bên ký tự /
Trường hợp 4 chữ: giữ lại 1 dấu cách ở tên, nhưng không có dấu cách ở lót
Trường hợp 5 chữ: giữ lại 1 dấu cách ở lót, nhưng không có dấu cách ở tên

Làm việc với text cần chính xác 100%. Nhưng thớt thì khoái viết tắt cho nên diễn tả luôn thiếu sót. Phải qua vài lần hỏi đi hỏi lại mới ra đúng.

(*) Tôi chỉ đùa thôi. Ý tôi nói là code trên rất hiệu quả nhưng vì hiệu quả cho nên khó uyển chuyển nếu yêu cầu thay đổi.

 

[dovanhoc84]

cảm ơn các bác. giờ em mới biết gọi hàm trim kiểu này

 

[VetMini]

cảm ơn các bác. giờ em mới biết gọi hàm trim kiểu này

Nếu mãi đến giờ này mới biết thì nên đi tìm học thêm về phạm vi (scope) của module.

 

[dovanhoc84]

Nếu mãi đến giờ này mới biết thì nên đi tìm học thêm về phạm vi (scope) của module.

vừa đúng em bị mắc 1 lệnh clearcontents ở sheet khác khi chạy event worksheetchange mà không hiểu tại sao. Giờ lại vỡ ra thêm cái nữa.
một phần là do em không chuyên về công việc excel hẳn. chỉ là vài thao tác khi liên kết với phần mềm khác nên độ sâu về mấy cái này chưa đủ. vậy nên em mới hay lên đây làm thử để tìm ra chỗ cần phải vỡ như bác chỉ đấy ạ. cảm ơn bác lần nữa.

 

[bitun1991]

em làm được rồi cm các anh