Xin giúp đỡ tách chữ viết hoa với dấu phẩy (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

vandang2302

Thành viên mới
Tham gia
10/12/17
Bài viết
2
Được thích
0
Giới tính
Nam
Chào các anh chị
Em có nhiều dữ liệu như này

MotHaiThang BaThang BonNam

Giờ em muốn chuyển xuống thành như này

Mot, Hai, Thang Ba, Thang Bon, Nam

Thì dùng hàm gì để cho thể chuyển đổi được
Em xin cám ơn nhiều nhiều
Mã:
MotHaiThang BaThang BonNam

Mot, Hai, Thang Ba, Thang Bon, Nam
 
Chào các anh chị
Em có nhiều dữ liệu như này

MotHaiThang BaThang BonNam

Giờ em muốn chuyển xuống thành như này

Mot, Hai, Thang Ba, Thang Bon, Nam

Thì dùng hàm gì để cho thể chuyển đổi được
Em xin cám ơn nhiều nhiều
Mã:
MotHaiThang BaThang BonNam

Mot, Hai, Thang Ba, Thang Bon, Nam
Nếu tất cả cấu trúc đều tương tự vậy thì có lẽ làm được. Nhưng nếu dữ liệu nhiều lên và lung tung thì khó
 
Không còn cách nào à anh, chứ cái này nhiều lắm
Chuyển tay chắc gẫy tay mà chưa xong mất
Mình đoán 99% là dữ liệu không chỉ có thế này mà còn nhiều dạng khác.

- Gẫy tay mà chưa xong mất.
(Mình có quen một bạn khoa chấn thương chỉnh hình bệnh viện 108)
 
Lần chỉnh sửa cuối:
Chào các anh chị
Em có nhiều dữ liệu như này

MotHaiThang BaThang BonNam

Giờ em muốn chuyển xuống thành như này

Mot, Hai, Thang Ba, Thang Bon, Nam

Thì dùng hàm gì để cho thể chuyển đổi được
Em xin cám ơn nhiều nhiều
Mã:
MotHaiThang BaThang BonNam

Mot, Hai, Thang Ba, Thang Bon, Nam
Mình không thấy quy luật nào ở đây luôn á.
Bạn gửi file kèm nhiều hơn 10 ví dụ minh họa cho mọi người ở đây hiểu ý của bạn hơn được không?!
 
Mình không thấy quy luật nào ở đây luôn á.
Bạn gửi file kèm nhiều hơn 10 ví dụ minh họa cho mọi người ở đây hiểu ý của bạn hơn được không?!
Vậy mà không thấy?
- Ký tự hoa đi sau dấu cách thì giữ nguyên
- Ký tự hoa đi sau ký tự khác thì chèn thêm một dấu phẩy và một dấu cách.

Bài này viết bằng VBA thì tương đối dễ. Bạn nào muốn thử sức Regex thì thử đi.

(tuổi trẻ bi giờ nhỏng nhẻo bắt sợ. Có chỉnh sửa một mớ text mà cũng "gẫy tay")
 
Nếu dữ liệu thật chỉ có tháng Một đến Mười Hai thì dễ. Còn không thì post file lên nhé.
 
Chào các anh chị
Em có nhiều dữ liệu như này

MotHaiThang BaThang BonNam

Giờ em muốn chuyển xuống thành như này

Mot, Hai, Thang Ba, Thang Bon, Nam

Thì dùng hàm gì để cho thể chuyển đổi được
Em xin cám ơn nhiều nhiều
Mã:
MotHaiThang BaThang BonNam

Mot, Hai, Thang Ba, Thang Bon, Nam
Dữ liệu tại A1:A10 sheet1
Mã:
Sub abc()
Dim DL
Dim i
DL = Sheet1.Range("A1:A10")
With CreateObject("VbScript.RegExp")
    .Global = True
    .Pattern = "([a-z])([A-Z])"
    For i = 1 To 10
        If .test(DL(i, 1)) Then
            DL(i, 1) = .Replace(DL(i, 1), "$1" & ", " & "$2")
        End If
    Next i
End With
Sheet1.Range("C1:C10") = DL
End Sub
 
Web KT

Bài viết mới nhất

Back
Top Bottom