sua may tinh its

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

Tiếp Nhận Dịch Vụ

 

 

 

 

 

 

8h-12h * 12h30-17h30

Làm Cả Chủ Nhật

hotroyahoo  hotroskype

số điện thoại sửa máy vi tính 08 3895 2161 (Liên Hệ Sửa Máy Tính)

số điện thoại nạp mực máy in tận nơi 0938 169 138 - 0984 966 552

Email sửa máy tính lienhe@truongthinh.info

Thông Báo ITS Co.,LTD

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


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

nap muc may in tan noi hcm

thiet ke website truong thinh

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