Để chuyển chữ thường sang chữ hoa

[Mr Okebab]

To Mr_Okebab:
Hàm Ucase trong VBA sao lại giống hàm Proper trong M$ Excel nhỉ????

Không phải là giống mà là . . . hơi giống. Ý rằng có thể dựa vào nó để làm giống như Proper.

Thân!

 

[connhangheo]

theo em nghĩ thì sẽ làm như sau
- đầu tiên tách chuỗi thành từng phần tử (dùng split ???)
- lưu các phần tử này vào 1 mảng (động)
- với mỗi phần tử của mảng sẽ dùng hàm Ucase như bác Bắp nói
- gộp các phần tử này lại thành 1 chuỗi (dùng join ???)
- cuối cùng là in ra chuỗi đó, thế là okei???
em nghĩ là như thế nhưng chưa thử, mong các bác chỉ giáo

em xin thực hiện ý tưởng của em,mong các bác cho ý kiến, em mới học VBA. Thanks

 

[ongtrungducmx25]

cái này cũng hay nhưng muốn chọn nhiều ô thì phải làm sau

Function pro(chuoi As String) As String
    Dim i As Integer, arr(1) As String, gop() As String
    Dim strin As String, strout As String, tach() As String
    gop = Split(chuoi, " ")
    For i = LBound(gop) To UBound(gop)
     If gop(i) <> "" Then
      arr(0) = UCase(Left(gop(i), 1))
      arr(1) = LCase(Mid(gop(i), 2))
      gop(i) = Join(arr, "")
     End If
     Next i
    strin = Join(gop, " ")
    tach = Split(strin, " ")
    strout = ""
    For i = LBound(tach) To UBound(tach)
     If tach(i) <> "" Then
      strout = strout & " " & tach(i)
     End If
    Next i
    pro = Trim(strout)
End Function

mỗi lần chọn thì phải đánh lại hàm sau bạn thì lâu lắm đó bạn có thể làm ra một UF không nhỉ!

 

[connhangheo]

em ko hiểu, em mới học, bác thông cảm. UF là cái gì ạ

 

[phamduylong]

mình chuyển từ .vntime font ABC sang Unicode không được. Có cách nào một văn bản chuyển từ .VNtime sang font Unicode VD Arial dc không bạn? vì có những văn bản (sẵn có) phải chuyển cho người việt ở nước ngoài thì họ không đọc được font vntime.mà họ chỉ có time new romance và arial thì ok.

Chuyển mã các bảng tính Excel, các bạn tham khảo tại:
[URL="http://www.giaiphapexcel.com/forum/showthread.php?t=2738"]http://www.giaiphapexcel.com/forum/showthread.php?t=2738http://www.giaiphapexcel.com/forum/showthread.php?p=22857#post22857[/URL]

Trong Excel cũng có hàm UPPER(text) để chuyển chữ thường thành chữ hoa.

Hàm PROPER và UPPER không xử lý đúng với Unicode.
Ví dụ PROPER("NGUYỄN TRẢI") > NguyỄn Trãi, UPPER("ông trời") > ÔNG TRờI.

 

[connhangheo]

em thử hàm của em được thì thấy được, bác thử xem có được ko nhé, em mới học, mong các bác góp ý kiến

 

[p_tai79]

sao không dung cái này làm được hết

mình chuyển từ .vntime font ABC sang Unicode không được. Có cách nào một văn bản chuyển từ .VNtime sang font Unicode VD Arial dc không bạn? vì có những văn bản (sẵn có) phải chuyển cho người việt ở nước ngoài thì họ không đọc được font vntime.mà họ chỉ có time new romance và arial thì ok.

sao không dung cái này làm được hết

 

[hsilver]

mấy bác nói cao siêu vậy thì chỉ có mấy người biết rồi mà quên thì nhắc cho nhớ. Chứ mấy anh em chưa đụng hàm loại này nghe chỉ như sấm đánh ngang tai.phê lòi mắt

 

[hsilver]

sao không dung cái này làm được hết

đã test bài này. thanks alot

 

[phamnhung8988]

chuyển chữ hoa, chữ thường

mình có đọc được cách - Đổi chữ hoa thành chữ thường (đã bổ sung chức năng nhận diện ô có công thức thì không chuyển đổi), phím tắt như sau:
Ctrl+Shift+H - CHUYỂN TẤT CẢ THÀNH CHỮ HOA
Ctrl+Shift+T - chuyển tất cả thành chữ thường
Ctrl+Shift+K - Chuyển Tất Cả Thành Chữ Hoa Đầu Mỗi Từ
Ctrl+Shift+F - Chuyển tất cả thành chữ hoa đầu dòng thôi.

nhưng có lúc thực hiện được, có lúc lại không thực hiện được, ai đó biết thì chỉ cho mình với, cám ơn cả nhà nhiều

 

[MrTeCong]

Hàm PROPER và UPPER không xử lý đúng với Unicode.
Ví dụ PROPER("NGUYỄN TRẢI") > NguyỄn Trãi, UPPER("ông trời") > ÔNG TRờI.

Có cách khắc phục hàm UPPER không ?

 

[khuongvietphong]

Có cách khắc phục hàm UPPER không ?

Của mình vẫn được mà bạn. Bạn xem thử File sau.

 

[MrTeCong]

Của mình vẫn được mà bạn. Bạn xem thử File sau.

Không được, dùng chính file của bạn nó vẫn là : ÔNG TRờI