Bạn đã bao giờ gặp trường hợp phải chuyển đổi tiếng việt có dấu về dạng không lốt trên Excel chưa? Làm nỗ lực nào để quăng quật dấu tiếng việt trong số đoạn văn bạn dạng (đoạn text) sinh hoạt trong một ô hay 1 vùng ô trên Excel?Hãy thuộc dienlanhcaonguyen.com đi kiếm câu vấn đáp cho các câu hỏi này nhé. Bật mí là họ có cho tới 2 cách thức khác nhau để triển khai điều này. Hãy khám phá ngay nào.
Bạn đang đọc: Chuyển chữ có dấu thành không dấu
Dùng Unikey để bỏ dấu giờ đồng hồ việt vào Excel
http://unikey.vn/vietnam/
Sau khi thiết đặt xong, họ sẽ thực hiện từng cách như sau:
Bước 1: xem lại font chữ đang sử dụng
Mỗi font chữ sẽ nối liền với 1 cỗ gõ (bảng mã) không giống nhau. Việc hiểu đúng về những loại font text thuộc bảng mã nào sẽ giúp bạn tiến hành thao tác chuyển đổi bỏ dấu chính xác hơn. Dướiđây là 1 trong sốloại font chữ phổbiến hay sử dụngở Việt Nam:
Các font như Arial, Times New Roman, Calibri… thuộc bảng mã UnicodeCác font như .VnTimes, .VnTimesH… (bắt đầu cùng với chữ .Vn)thuộc bảng mã TCVN3Các phông như VNI-Times… (bắtđầu cùng với chữ VNI) thuộc bảng mã VNIWindowsVị trí kiểm tra font chữ nằm ở vị trí nhóm fonts trên thẻ Home. Ví dụ:
Đoạn ngôn từ trong vùng A2:A4 bao gồm font là Times New Roman, nằm trong bảng mã Unicode.
Bước 2: xào luộc nội dung cần loại trừ dấu.
Chúý: Trước khi thực hiện bước này, các bạn cầnđảm bảo nội dung trong những ô phảiđược hiển thịđầyđủ (có thể nhìn không thiếu bằng mắt thường). Giả dụ hiển thị khôngđầyđủ rất có thể khiến tác dụng chuyểnđổi không đúng đắn như ý muốn.
Xem thêm: Ông Xã Hoa Hâu Đặng Thu Thảo : Từ Gái Quê Đến Top 100 Mỹ Nhân Châu Á
Thao tác copy như sau:
Bôiđen vùngô yêu cầu copy (chọn các ô bắt buộc copy)Bấm phím tắtđể copy: Ctrl + C (hoặc nhấn vào phải tài vùng đã chọn, bấm chọn mục Copy)Bước 3: thực hiện Unikey để triển khai bỏ vết tiếng việt
Việc tiếp theo sau là bạn bấm vào phải vào hình tượng Unikeyở góc bên cần phía dưới screen máy tính, chọn mục Công cụ… (phím tắt là Ctrl + Shift + F6):
Khi thực hiện làm việc này, bảng hình thức (Unikey Toolkit) đã mở ra.
Trong bảng chuyểnđổi, bạn thực hiện công việc sau:
Bước 4: Dán tác dụng vừa thuđượcở cách 3 vào vị trí phải lấy kết quả
Tại vị trí mong lấy hiệu quả (ví dụô B2), bạn bấm lệnh dán (Phím tắt Ctrl + V), bọn họ thu được kết quả như sau:
Chú ý:Khi dán công dụng sẽ cần sử dụng tới 2 cột (dù lúc copy câu chữ để biến hóa chỉ là một cột). Do đó bạn cầnđảm bảo luôn có 2 cột trốngđể hiển thị đầy đủ tác dụng mà không làm mất nội dungở cột khác.
Dùng hàm vào VBA để bỏ dấu giờ việt
Bản thân Excel không cung ứng sẵn hàm để tiến hành việc quăng quật dấu giờ việt. Mong có hàm để tiến hành việc này, bạn nên biết cách viết hàm từ bỏ tạotrong VBA. Sau đây họ cùng tìm hiểu cách tạo thành hàm bỏ dấu giờ việt trong Excel bằng VBA:
Tham khảo: biện pháp viết code trong VBA
Bước 1: open sổ VBA (phím tắt alt + F11), tạo bắt đầu 1 Module
Bước 2: chúng ta hãy sao chép đoạn code sau đây và dán vào hành lang cửa số viết code trong Module vừa sinh sản ở bước 1:
Function bo_dau_tieng_viet(Text As String) As String Dim AsciiDict As Object set AsciiDict = CreateObject("scripting.dictionary") AsciiDict(192) = "A" AsciiDict(193) = "A" AsciiDict(194) = "A" AsciiDict(195) = "A" AsciiDict(196) = "A" AsciiDict(197) = "A" AsciiDict(199) = "C" AsciiDict(200) = "E" AsciiDict(201) = "E" AsciiDict(202) = "E" AsciiDict(203) = "E" AsciiDict(204) = "I" AsciiDict(205) = "I" AsciiDict(206) = "I" AsciiDict(207) = "I" AsciiDict(208) = "D" AsciiDict(209) = "N" AsciiDict(210) = "O" AsciiDict(211) = "O" AsciiDict(212) = "O" AsciiDict(213) = "O" AsciiDict(214) = "O" AsciiDict(217) = "U" AsciiDict(218) = "U" AsciiDict(219) = "U" AsciiDict(220) = "U" AsciiDict(221) = "Y" AsciiDict(224) = "a" AsciiDict(225) = "a" AsciiDict(226) = "a" AsciiDict(227) = "a" AsciiDict(228) = "a" AsciiDict(229) = "a" AsciiDict(231) = "c" AsciiDict(232) = "e" AsciiDict(233) = "e" AsciiDict(234) = "e" AsciiDict(235) = "e" AsciiDict(236) = "i" AsciiDict(237) = "i" AsciiDict(238) = "i" AsciiDict(239) = "i" AsciiDict(240) = "d" AsciiDict(241) = "n" AsciiDict(242) = "o" AsciiDict(243) = "o" AsciiDict(244) = "o" AsciiDict(245) = "o" AsciiDict(246) = "o" AsciiDict(249) = "u" AsciiDict(250) = "u" AsciiDict(251) = "u" AsciiDict(252) = "u" AsciiDict(253) = "y" AsciiDict(255) = "y" AsciiDict(352) = "S" AsciiDict(353) = "s" AsciiDict(376) = "Y" AsciiDict(381) = "Z" AsciiDict(382) = "z" AsciiDict(258) = "A" AsciiDict(259) = "a" AsciiDict(272) = "D" AsciiDict(273) = "d" AsciiDict(296) = "I" AsciiDict(297) = "i" AsciiDict(360) = "U" AsciiDict(361) = "u" AsciiDict(416) = "O" AsciiDict(417) = "o" AsciiDict(431) = "U" AsciiDict(432) = "u" AsciiDict(7840) = "A" AsciiDict(7841) = "a" AsciiDict(7842) = "A" AsciiDict(7843) = "a" AsciiDict(7844) = "A" AsciiDict(7845) = "a" AsciiDict(7846) = "A" AsciiDict(7847) = "a" AsciiDict(7848) = "A" AsciiDict(7849) = "a" AsciiDict(7850) = "A" AsciiDict(7851) = "a" AsciiDict(7852) = "A" AsciiDict(7853) = "a" AsciiDict(7854) = "A" AsciiDict(7855) = "a" AsciiDict(7856) = "A" AsciiDict(7857) = "a" AsciiDict(7858) = "A" AsciiDict(7859) = "a" AsciiDict(7860) = "A" AsciiDict(7861) = "a" AsciiDict(7862) = "A" AsciiDict(7863) = "a" AsciiDict(7864) = "E" AsciiDict(7865) = "e" AsciiDict(7866) = "E" AsciiDict(7867) = "e" AsciiDict(7868) = "E" AsciiDict(7869) = "e" AsciiDict(7870) = "E" AsciiDict(7871) = "e" AsciiDict(7872) = "E" AsciiDict(7873) = "e" AsciiDict(7874) = "E" AsciiDict(7875) = "e" AsciiDict(7876) = "E" AsciiDict(7877) = "e" AsciiDict(7878) = "E" AsciiDict(7879) = "e" AsciiDict(7880) = "I" AsciiDict(7881) = "i" AsciiDict(7882) = "I" AsciiDict(7883) = "i" AsciiDict(7884) = "O" AsciiDict(7885) = "o" AsciiDict(7886) = "O" AsciiDict(7887) = "o" AsciiDict(7888) = "O" AsciiDict(7889) = "o" AsciiDict(7890) = "O" AsciiDict(7891) = "o" AsciiDict(7892) = "O" AsciiDict(7893) = "o" AsciiDict(7894) = "O" AsciiDict(7895) = "o" AsciiDict(7896) = "O" AsciiDict(7897) = "o" AsciiDict(7898) = "O" AsciiDict(7899) = "o" AsciiDict(7900) = "O" AsciiDict(7901) = "o" AsciiDict(7902) = "O" AsciiDict(7903) = "o" AsciiDict(7904) = "O" AsciiDict(7905) = "o" AsciiDict(7906) = "O" AsciiDict(7907) = "o" AsciiDict(7908) = "U" AsciiDict(7909) = "u" AsciiDict(7910) = "U" AsciiDict(7911) = "u" AsciiDict(7912) = "U" AsciiDict(7913) = "u" AsciiDict(7914) = "U" AsciiDict(7915) = "u" AsciiDict(7916) = "U" AsciiDict(7917) = "u" AsciiDict(7918) = "U" AsciiDict(7919) = "u" AsciiDict(7920) = "U" AsciiDict(7921) = "u" AsciiDict(7922) = "Y" AsciiDict(7923) = "y" AsciiDict(7924) = "Y" AsciiDict(7925) = "y" AsciiDict(7926) = "Y" AsciiDict(7927) = "y" AsciiDict(7928) = "Y" AsciiDict(7929) = "y" AsciiDict(8363) = "d" Text = Trim(Text) If Text = "" Then Exit Function Dim Char As String, _ NormalizedText As String, _ UnicodeCharCode As Long, _ i As Long "Remove accent marks (diacritics) from text For i = 1 to lớn Len(Text) Char = Mid(Text, i, 1) UnicodeCharCode = AscW(Char) If (UnicodeCharCode "See http://support.microsoft.com/kb/272138 UnicodeCharCode = 65536 + UnicodeCharCode kết thúc If If AsciiDict.Exists(UnicodeCharCode) Then NormalizedText = NormalizedText và AsciiDict.Item(UnicodeCharCode) Else NormalizedText = NormalizedText & Char end If Next bo_dau_tieng_viet = NormalizedTextEnd FunctionBước 3:Trở về màn hình hiển thị làm việcExcel. Hiện giờ bạnđã có thể sử dụng hàm bo_dau_tieng_vietđược rồi.
Một số giữ ý:
Bạn đề xuất lưu file bên dưới dạngEnable-macroWorkbook (.xlsm) nếu không sẽ mất hết các code đã tất cả (khi đóng góp file), bởi dạng file thường thì .xlsx không được cho phép lưu trữ các đoạn code vào VBA.Code nằm tại vị trí file như thế nào thì chỉ tệp tin đó sử dụng được mà lại thôi. Cho nên khi mở file khác không có chứa đoạn code bên trên thì các bạn sẽ không thấy hàm bo_dau_tieng_viet.
