Hướng dẫn chi tiết cách xóa dấu tiếng Việt trong Excel
Nội dung bài viết
Bài viết này sẽ hướng dẫn bạn từng bước cụ thể để loại bỏ dấu tiếng Việt trong Excel.
Khám phá 2 phương pháp hiệu quả để chuyển đổi văn bản tiếng Việt có dấu sang không dấu.
- Cách 1: Sử dụng công cụ Unikey một cách nhanh chóng và dễ dàng.
- Cách 2: Tận dụng VBA để tự tạo hàm chuyển đổi dấu tiếng Việt một cách linh hoạt.
Cách 1: Sử dụng Unikey để chuyển đổi văn bản tiếng Việt có dấu thành không dấu một cách nhanh chóng.
Ví dụ: Chuyển đổi cột họ tên từ có dấu sang không dấu để phục vụ mục đích xử lý dữ liệu.
Xác định bảng mã của dữ liệu nguồn. Trong ví dụ này, cột họ tên sử dụng font Times New Roman -> thuộc bảng mã Unicode.
Bước 1: Sao chép toàn bộ dữ liệu cần chuyển đổi từ có dấu sang không dấu.
Bước 2: Nhấp chuột phải vào biểu tượng Unikey ở góc phải màn hình -> Chọn Công cụ…[CS + F6] hoặc sử dụng tổ hợp phím Ctrl + Shift + F6.
Bước 3: Trong hộp thoại hiện ra, tại mục Bảng mã, chọn Unicode làm bảng mã nguồn. Bảng mã đích có thể giữ nguyên hoặc thay đổi tùy nhu cầu. Tích chọn Loại bỏ dấu và nhấn Chuyển mã.
Bước 4: Khi hộp thoại thông báo chuyển mã thành công xuất hiện, nhấn OK để hoàn tất quá trình.
Nếu dữ liệu nguồn không hợp lệ, hộp thoại thông báo sẽ hiển thị. Nhấn OK để kiểm tra và chọn lại dữ liệu nguồn.
Quay lại bảng tính Excel, chọn vị trí cần dán dữ liệu và nhấn tổ hợp phím Ctrl + V -> kết quả hiển thị toàn bộ văn bản đã được loại bỏ dấu.
Đây là phương pháp đơn giản để loại bỏ dấu tiếng Việt. Lưu ý rằng các phiên bản cũ của Unikey có thể không hỗ trợ tính năng này.
Cách 2: Tận dụng VBA để tự động hóa quá trình chuyển đổi.
Bước 1: Nhấn tổ hợp phím Alt + F11 để mở cửa sổ VBA và bắt đầu quá trình tạo hàm.
Bước 2: Chọn thẻ Insert -> Module để tạo một module mới.
Bước 3: Sao chép đoạn mã dưới đây và dán vào Module vừa tạo.
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
Bước 4: Quay lại file Excel, truy cập File -> Options để thiết lập cài đặt bảo mật.
Bước 5: Trong hộp thoại hiện ra, chọn mục Trust Center -> Trust Center Settings để điều chỉnh cài đặt macro.
Bước 6: Tại mục Macro Settings, chọn Enable all macros (not recommended; potentially dangerous code caption) và tích chọn Trust access to the VBA project object model trong phần Developer Macro Settings.
Bước 7: Sau khi hoàn thành, bạn đã tạo thành công hàm ConvertToUnSign(). Để chuyển đổi dữ liệu trong ô D6 sang không dấu, nhập công thức: =ConvertToUnSign(D6).
Bước 8: Nhấn Enter -> dữ liệu sẽ được chuyển đổi thành không dấu. Tuy nhiên, việc xây dựng hàm có thể tốn thời gian và không hiệu quả khi xử lý lượng dữ liệu lớn.
Trên đây là những phương pháp cơ bản giúp bạn loại bỏ dấu tiếng Việt trong Excel một cách hiệu quả.
Chúc bạn thực hiện thành công và đạt được kết quả như mong đợi!
Có thể bạn quan tâm