Xin giúp đỡ công thức hoặc cách điền họ tên cha và mẹ

[truongthedong]

Có anh/chị nào cho em xin cái Command Button hoặc addin, nhấn một phát thì Chuyển Sang Viết Hoa Chữ Đầu Không. Xin cảm ơn nhiều hihi

 

[truongthedong]

Em đã tìm được trên gpe rồi nha, thanks

có anh/chị nào cho em xin cái command button hoặc addin, nhấn một phát thì chuyển sang viết hoa chữ đầu không. Xin cảm ơn nhiều hihi

 

[MuaBuiRoi]

Có anh/chị nào cho em xin cái Command Button hoặc addin, nhấn một phát thì Chuyển Sang Viết Hoa Chữ Đầu Không. Xin cảm ơn nhiều hihi

Trong file trên của tôi có hàm CapFormat(...) chuyển chữ hoa đó, bạn bấm Alt+F11 là thấy

Bạn nói đúng 98% vậy 2% là cái gì, lưu ý code thì các hộ phải chủ hộ thì mới đúng, nếu không sẽ sai,

Như bạn nói đó: nhớ trách nhiệm kiểm tra từng hộ sau khi có kết quả từ code

 

[truongthedong]

2% là gì thì mình cũng ko rõ lắm. Thấy vẫn là chủ hộ, vợ, con nhưng phần tên cha lại ko tự điền dc.
Đương nhiên là em sẽ kiểm tra lại rồi vì tên cha mẹ ko thể tùy tiện dc.
thanks các anh chị nhiều

Trong file trên của tôi có hàm CapFormat(...) chuyển chữ hoa đó, bạn bấm Alt+F11 là thấy

Bạn nói đúng 98% vậy 2% là cái gì, lưu ý code thì các hộ phải chủ hộ thì mới đúng, nếu không sẽ sai,

Như bạn nói đó: nhớ trách nhiệm kiểm tra từng hộ sau khi có kết quả từ code

 

[siwtom]

2% là gì thì mình cũng ko rõ lắm. Thấy vẫn là chủ hộ, vợ, con nhưng phần tên cha lại ko tự điền dc.

Giúp bạn rất khó vì bạn chỉ kêu mà không cho vd. cụ thể. Bạn nói dòng đỏ đỏ thì hãy cho dữ liệu ví dụ mà với dữ liệu ấy thì công thức và code "không điền được tên cha" thì mới bàn luận được. Mà cũng nên nói rõ dữ liệu thực như thế nào. "Chủ Hộ" luôn có hay có lúc quên nhập? Giới tính của chủ hộ luôn có hay có lúc quên nhập hoặc nhập sai (vd. Ông Trần Văn Văn là Nữ)? "Vợ" hoặc "Chồng" nếu có thì luôn ở trước các con? Tung dữ liệu lên không giải thích rõ rồi người khác tự đoán tự làm?. Rồi mình chỉ kêu "không được" mà không chỉ ra ở đâu không được?

Vài lời thế để bạn rút kinh nghiệm trong tương lai chứ tôi nghỉ cho khỏe

 

[MuaBuiRoi]

2% là gì thì mình cũng ko rõ lắm. ........
thanks các anh chị nhiều

Chủ nhân mà không rõ, thì người khác chắc rõ chăng, hãy mô tả kỹ khi muốn hỏi.

Nếu không nghĩa là đồng ý với kết quả giúp đỡ đó thì cám ơn rùi rút.

 

[truongthedong]

MÌnh đã tìm ra 2% còn lại là do Vợ hoặc Chồng không nằm ngay sau Chủ hộ mà nằm ở chỗ khác, chẳng hạn sau con, sau cháu, trước Chủ hộ tiếp theo, ...

Chủ nhân mà không rõ, thì người khác chắc rõ chăng, hãy mô tả kỹ khi muốn hỏi.

Nếu không nghĩa là đồng ý với kết quả giúp đỡ đó thì cám ơn rùi rút.

 

[truongthedong]

anh/Chị Muabuiroi ơi, em mở topic mới để xin các thành viên GPE giúp mà không thấy ai giúp hết. anh/chị có thể giúp giùm em topic này không. thanks anh nhiều

http://www.giaiphapexcel.com/forum/...ng-thức-hoặc-code-cho-form-đánh-mã-số-tự-động

Sửa code VBA,

bổ sung:
- dùng được cho 2 loại mã Unicode dựng sẵn và tổ hợp
- Tên kết quả chuyển hoa chữ đầu,
- xét trường hợp vợ chủ hộ, có chồng, ...

Chú ý: tên cha mẹ phải trước các con, trong 1 nhà chỉ có 1 cha 1 mẹ

xem file kèm

Public Sub ChaMeOi()
    Dim sArr(), dArr(), i As Long, Cha As String, Mama As String
    Dim Tmp, CHUHO As String, VO As String, CHONG As String
    Dim CHUHOt As String, VOt As String, CHONGt As String
    
'unicode Dungsan
    CHUHO = "CH" & ChrW(7910) & " H" & ChrW(7896)
    VO = "V" & ChrW(7906)
    CHONG = "CH" & ChrW(7890) & "NG"
'unicode ToHop
    CHUHOt = "CHU" & ChrW(777) & " HÔ" & ChrW(803)
    VOt = "V" & ChrW(416) & ChrW(803)
    CHONGt = "CHÔ" & ChrW(768) & "NG"
    
    sArr = Range([D3], [D3].End(xlDown)).Resize(, 8).Value
    ReDim dArr(1 To UBound(sArr, 1), 1 To 2)
    
    For i = 1 To UBound(sArr, 1)
        Tmp = UCase(Application.Trim(sArr(i, 2)))
        If Tmp = CHUHO Or Tmp = CHUHOt Then
            Cha = Empty:    Mama = Empty
            If UCase(sArr(i, 8)) = "NAM" Then
                    Cha = CapFormat(sArr(i, 1))
            Else:   Mama = CapFormat(sArr(i, 1)): End If
        ElseIf Tmp = VO Or Tmp = VOt Then
            Mama = CapFormat(sArr(i, 1))
        ElseIf Tmp = CHONG Or Tmp = CHONGt Then
            Cha = CapFormat(sArr(i, 1))
        End If
        
        If Tmp = "CON" Then
            dArr(i, 1) = Cha
            dArr(i, 2) = Mama
        End If
    Next i
    [F3:G3].Resize(i - 1) = dArr
End Sub

Song vẫn nên chú ý các điều tôi đã nói