Công Ty Dịch Vụ Sửa Máy Tính Tại Nhà Tận Nơi tphcm

Bạn đánh giá:  / 1
DỡHay 

Hàm excel chuyển đổi tiếng việt có dấu sang không dấu hướng dẫn chi tiết thành công 100%

Bước 1: Các bạn mở excel lên và ấn nút Alt-F11 Lúc này Microsoft Visua Basic mở lên.
Bước 2: Để chuyển chữ có dấu thành không dấu các bạn tiếp tục vào: Insert chọn menu Module

huong dan dung excel doi chu co dau thanh khong dau

Bước 3: Copy và Paste đoạn Code sau vào phần nội dung của Module (miền bên phải)

Function ConvertToUnSign(ByVal sContent As String) As String
Dim i As Long
Dim intCode As Long
Dim sChar As String
Dim sConvert As String
ConvertToUnSign = AscW(sContent)
For i = 1 To Len(sContent)
sChar = Mid(sContent, i, 1)
If sChar <> "" Then
intCode = AscW(sChar)
End If
Select Case intCode
Case 273
sConvert = sConvert & "d"
Case 272
sConvert = sConvert & "D"
Case 224, 225, 226, 227, 259, 7841, 7843, 7845, 7847, 7849, 7851, 7853, 7855, 7857, 7859, 7861, 7863
sConvert = sConvert & "a"
Case 192, 193, 194, 195, 258, 7840, 7842, 7844, 7846, 7848, 7850, 7852, 7854, 7856, 7858, 7860, 7862
sConvert = sConvert & "A"
Case 232, 233, 234, 7865, 7867, 7869, 7871, 7873, 7875, 7877, 7879
sConvert = sConvert & "e"
Case 200, 201, 202, 7864, 7866, 7868, 7870, 7872, 7874, 7876, 7878
sConvert = sConvert & "E"
Case 236, 237, 297, 7881, 7883
sConvert = sConvert & "i"
Case 204, 205, 296, 7880, 7882
sConvert = sConvert & "I"
Case 242, 243, 244, 245, 417, 7885, 7887, 7889, 7891, 7893, 7895, 7897, 7899, 7901, 7903, 7905, 7907
sConvert = sConvert & "o"
Case 210, 211, 212, 213, 416, 7884, 7886, 7888, 7890, 7892, 7894, 7896, 7898, 7900, 7902, 7904, 7906
sConvert = sConvert & "O"
Case 249, 250, 361, 432, 7909, 7911, 7913, 7915, 7917, 7919, 7921
sConvert = sConvert & "u"
Case 217, 218, 360, 431, 7908, 7910, 7912, 7914, 7916, 7918, 7920
sConvert = sConvert & "U"
Case 253, 7923, 7925, 7927, 7929
sConvert = sConvert & "y"
Case 221, 7922, 7924, 7926, 7928
sConvert = sConvert & "Y"
Case Else
sConvert = sConvert & sChar
End Select
Next
ConvertToUnSign = sConvert
End Function

dung ham excel doi chu co dau thanh khong dau

Thủ thuật excel chuyển chữ có dấu thành không dấu

Bước 4: Trở về Excel

chuyen chu co dau thanh khong co dau

Bước 5: Đặt công thức chuyển tiếng việt có dấu thành không dấu

=ConvertToUnSign("Chuỗi tiếng Việt có dấu")

Vậy là kết quả trả về chữ thành " Chuoi tieng viet co dau"

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

Hàm excel chuyển đổi tiếng việt có dấu sang không dấu - 5.0 out of 5 based on 1 review

XIN QUÝ KHÁCH LƯU Ý:

DO BÀI VIẾT TRÊN WEBSITE NHIỀU GIÁ SẢN PHẨM VÀ DỊCH VỤ CÓ THỂ THAY ĐỔI. VUI LÒNG LIÊN HỆ ĐỂ ĐƯỢC TƯ VẤN CHÍNH XÁC


Số Điện Thoại Sửa Máy Tính Tận nơi

Quyết định V/v Xuất Hóa Đơn Điện Tử Của Cơ Quan Thuế Với Trường Thịnh Group Co.,LTD Click >>

nap muc may in tan noi hcm

thiet ke website truong thinh

Sửa máy tính uy tín

Liên Kết

by

Sửa máy tính uy tín Trường Thịnh Group - CTY TNHH Trường Thịnh Group - 0938 169 138 - Sửa Máy Tính Trường Thịnh Group

DV nạp mực máy in quận tân bình và Đổ mực máy in quận bình thạnh Tại Nhà tphcm Đơn Vị Công ty thiết kế web uy tín HCM - DV Đơn vị Sửa máy tính uy tín hcm nhanh

THÔNG TIN WEBSITE

Công Ty TNHH Phát Triển Công Nghệ Trường Thịnh Group MST: 0312179313 | Ngày cấp giấy phép: 11/03/2013| Ngày hoạt động: 14/03/2013 (Đã hoạt động 4 năm)

Văn Phòng Điều Hành Địa chỉ: 549/71/21 Lê Văn Thọ, Phường 14, Quận Gò Vấp, Thành phố Hồ Chí Minh

Đại diện pháp luật: Phạm Đình Thuấn | Điện thoại: 08 38952161

Website đã thông báo với bộ công thương

Điện Thoại Công Ty Trường Thịnh Group