Dịch vụ sửa máy tính

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

Công ty thiết kế web tại tphcm

Công ty thiết kế in ấn tại tphcm

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

"Tìm --> Công ty, Trung Tâm, đơn vị, Chỗ, Nơi, Cửa HàngPc, Laptop, Máy tính để bàn, Thay, vi tính, Acer Dell, toshiba, Lenovo, Sony, Hp, Vệ Sinh, Sam Sung, Xeroc,

Pana, Panasonic, Brother, Bảo TrìGiá Rẻ, Uy Tín, Tận Nơi, Tận Nhà, Tại Nhà, , Nhanh, Kỹ thuật, Giỏi, hcm, tphcm, chất lượng, Chính hãng, loại tốt, Số điện thoại, Sửa, Sửa chữa"

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

Trụ sở: 549/71/21 Lê Văn Thọ, Phường 14, Quận Gò Vấp | CN: 17 Bạch Đằng, Phường 2, Tân Bình, HCM

Đại diện pháp luật: Phạm Đình Thuấn | Điện thoại: 1900636343 | Mã Bảo Mật 1: 22446688  | Mã Bảo Mật 2: 33445566Website đã thông báo với bộ công thương

Số Điện Thoại Công Ty Sửa Máy Tính HCM