Cách code dữ liệu từ dạng text sang dạng số (3 người xem)

[casino.vp]

Chào anh chị, em có 2 vấn đề cần anh chị giải đáp ạ.
Em đang làm 1 fle dữ liệu, trong đó có 1 cột là họ tên, 1 cột là nơi sinh sống ( quê quán) như sau:

1. Nguyễn Văn Nam Hà Nội
2. Đỗ Văn Đạt TPHCM.
3. Nguyễn Thị Mai Hoa Hà Nội

Giờ em muốn thêm 1 cột đổi chỉ lấy chữ cái đầu của họ, đệm và tên, Cột quê quán đổi hết thành số ( 1 là Hà Nội, 2 là TPHCM)
Kết quả em mong muốn như sau:

1. Nguyễn Văn Nam NVN 1
2. Đỗ Văn Đạt NVĐ 2
3. Nguyễn Thị Mai Hoa NTMH 1

Em cảm ơn

 

[comet_1701]

Chào anh chị, em có 2 vấn đề cần anh chị giải đáp ạ.
Em đang làm 1 fle dữ liệu, trong đó có 1 cột là họ tên, 1 cột là nơi sinh sống ( quê quán) như sau:

1. Nguyễn Văn Nam Hà Nội
2. Đỗ Văn Đạt TPHCM.
3. Nguyễn Thị Mai Hoa Hà Nội

Giờ em muốn thêm 1 cột đổi chỉ lấy chữ cái đầu của họ, đệm và tên, Cột quê quán đổi hết thành số ( 1 là Hà Nội, 2 là TPHCM)
Kết quả em mong muốn như sau:

1. Nguyễn Văn Nam NVN 1
2. Đỗ Văn Đạt NVĐ 2
3. Nguyễn Thị Mai Hoa NTMH 1

Em cảm ơn

Các bạn mới nên lưu ý, nên có file đính kèm gửi lên , đừng để mọi người gõ lại nội dung file của các bạn, ngại lắm, cũng gần tết đến nơi rồi

 

[casino.vp]

Em cảm ơn anh ạ, em xin gửi lại cả nhà file em cần giúp ạ

Em cảm ơn

 

[comet_1701]

Em cảm ơn anh ạ, em xin gửi lại cả nhà file em cần giúp ạ

Em cảm ơn

Function Timten(st As String)
    Dim i As Long
    For i = 1 To 1000
        If UCase(Mid(st, i, 1)) = Mid(st, i, 1) Then
            Timten = Timten & Mid(st, i, 1)
        End If
    Next
    Timten = Replace(Timten, " ", "")
End Function

=Timten(C4 nhé) rôì kéo xuống sẽ ra được NVN
Bạn chép code trên bằng Alt+F11, kích vào workbook, Insert Module rồi dùng hàm trên nhé, còn 1,2 chắc ko khó lắm đâu
Đoạn này mình thấy hơp lý hơn

Function Timten(st As String) As String
    Dim i As Long, TMP
    TMP = Split(Trim(st), " ")
    For i = 0 To UBound(TMP)
        Timten = Timten & UCase(Left(TMP(i), 1))
   
    Next
  
End Function

 

[Cá ngừ F1]

1. Việc lấy ký tự đầu tiên:
Trên diễn đàn có rất nhiều chủ đề nói về vấn đề này,
Bạn chỉ cần tìm kiếm với từ khóa: "Tách chữ cái đầu tiên" là ra rất nhiều giải pháp để bạn tham khảo và áp dụng vào bài toán của mình.

2. Đổi thành mã số:
Bạn cho cả bảng phụ gồm 2 trường là: Tên tỉnh thành, Mã số
Rồi dùng hàm Vlookup

Chúc bạn thành công!

 

[casino.vp]

Em cảm ơn anh nhiều ạ, em làm được rồi, nhưng có 1 vấn đề là nếu họ tên bắt đầu là nguyên âm như Âu Thế Quang, Nguyễn Văn Ỉn chẳng hạn thì nó lại xuất ra thảnh ÂTQ, NVỈ chứ không được như ATQ, NVI mình mong muốn ạ. Em phải làm thế nào ạ

Em cảm ơn