VBA Function Hàm Bỏ Dấu Tiếng Việt | Giải Pháp Excel
Có thể bạn quan tâm
- Trang chủ Có gì mới Hoạt động gần nhất Tác giả
- Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
- Video
Video về Excel Video về tin học khác Tin tức về tin học chung - Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
- Tài nguyên Đánh giá mới nhất Tìm tài nguyên
- Đóng góp
Tìm kiếm
Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Tìm kiếm Tìm nâng cao…- Tìm bài viết mới
- Tìm theo chuyên mục
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
- Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc
- Trang chủ
- Diễn đàn
- Những vấn đề chung
- Thread starter Thread starter locbanh
- Ngày gửi Ngày gửi 14/9/18
Người dùng đang xem chủ đề này
Đang trực tuyến: 2 (Thành viên: 0, Khách: 2)locbanh
Thành viên chính thức 

Tham gia 5/5/13 Bài viết 70 Được thích 8 Chào các ACE mình có vấn đề cần ACE giúp đở về hàm bỏ dấu tiếng việt Sau khi tra cứu trên google thì có rất nhiều hàm bỏ dấu tiếng việt ( bỏ dấu Uni, bỏ dấu Vn3, bỏ dấu Vni ) nhưng khách hàng gửi file cho mình không biết gỏ kiểu gì??? mà áp dụng mấy hàm đó không bỏ hết được dấu. nên việc macrro chạy tiếp phía sau trở nên khó khăn hơn. Nên trước khi chạy mình thường sử dụng "UniKey" (Ctrl+Shilft+F6) để bỏ dấu, rồi mới dám chạy macro tiếp tục.... Mình có đính kèm file nhờ ACE xem giúp có hàm bỏ dấu nào tốt hơn ko? Hiện hàm bỏ dấu mình đang sử dung là : Function BoDau(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 Len(Text) Char = Mid(Text, i, 1) UnicodeCharCode = AscW(Char) If (UnicodeCharCode < 0) Then 'See http://support.microsoft.com/kb/272138 UnicodeCharCode = 65536 + UnicodeCharCode End If If AsciiDict.Exists(UnicodeCharCode) Then NormalizedText = NormalizedText & AsciiDict.Item(UnicodeCharCode) Else NormalizedText = NormalizedText & Char End If Next BoDau = NormalizedText End Function -------------- Thanks ACE nhiều ---------------- File đính kèm
- tinhhuyen.xlsx tinhhuyen.xlsx 138 KB · Đọc: 100
huuthang_bd
Chuyên gia GPE 
Tham gia 10/9/08 Bài viết 8,941 Được thích 11,357 Donate (Momo)
Giới tính Nam Nghề nghiệp Thợ đụng Chủ thớt dùng add-in này thử xem. Đồ cổ nhưng vẫn dùng được. locbanh
Thành viên chính thức 

Tham gia 5/5/13 Bài viết 70 Được thích 8 Dù sao cũng cám ơn các ACE đã quan tâm. File này là khách hàng gửi mình đâu nhúng tay vào đươc Mình muốn xin Function bỏ dẩu tiếng việt để mình bỏ chung macro chạy 1 lần ra file luôn. Hiện tại mình đang thêm 1 công đoạn là dủng unikey bỏ dấu trước khi chạy macro và muốn bỏ qua công đoạn này. befaint
|||||||||||||
Tham gia 6/1/11 Bài viết 14,600 Được thích 19,843hpkhuong đã viết: Paste vào đó -> To UNICODE Nhấp chuột vào đây để mở rộng...Em làm thử với "ACE" được kết quả như này. "Ăn C** Em"!
batman1
Thành viên gạo cội



Tham gia 8/9/14 Bài viết 5,776 Được thích 9,819 Tôi viết từ thủa ban đầu nhưng lười không muốn xem lại và tối ưu. 1. Alt + F11 -> menu Insert -> Module -> dán code trong tập tin đính kèm vào module mới thêm 2. Thêm tiếp 1 Module và dán code Mã: Sao chép. Sub khong_dau() Dim lastRow As Long, r As Long, data With ThisWorkbook.Worksheets("Ma Full") lastRow = .cells(Rows.Count, "C").End(xlUp).Row If lastRow < 2 Then Exit Sub data = .Range("C2:C" & lastRow).Value For r = 1 To UBound(data) If data(r, 1) <> "" Then data(r, 1) = SourceToDest(data(r, 1), src_uni, dst_khongdau) End If Next r .Range("D2:D" & lastRow).Value = data End With End Sub File đính kèm
- sourcetodest.rar sourcetodest.rar 3.6 KB · Đọc: 326
locbanh
Thành viên chính thức 

Tham gia 5/5/13 Bài viết 70 Được thích 8 batman1 đã viết: Tôi viết từ thủa ban đầu nhưng lười không muốn xem lại và tối ưu. 1. Alt + F11 -> menu Insert -> Module -> dán code trong tập tin đính kèm vào module mới thêm 2. Thêm tiếp 1 Module và dán code Mã: Sao chép. Sub khong_dau() ........................................... End Sub Nhấp chuột vào đây để mở rộng...Cám ơn A batman1 rất nhiều Code này là quá cao siêu rồi. em làm theo a và chạy được rồi. Nhưng E chỉ cần 1 cái Function đơn giàn thôi không phải chạy tùm lum Sub ( gà như em nhìn như đám rừng bấm F8 chạy cũng ko biết gì luôn hihihi ) Vi du Function BoDau () + ô C2 = Giải Pháp Excel + cột D2 chì cần nhập "=BoDau(C2)" kết quả ô D2 là = Giai Phap Excel Em chỉ cần đơn giản vậy thôi. Nhờ A cứu giúp.
Phuocam
Thành viên mới
Tham gia 16/5/13 Bài viết 4,807 Được thích 7,869locbanh đã viết: + cột D2 chì cần nhập "=BoDau(C2)" Nhấp chuột vào đây để mở rộng...Bạn thêm hàm này vào: Mã: Sao chép. Public Function BoDau(str As String) As String BoDau = SourceToDest(str, src_uni, dst_khongdau) End Function B
batman1
Thành viên gạo cội



Tham gia 8/9/14 Bài viết 5,776 Được thích 9,819 locbanh đã viết: Cám ơn A batman1 rất nhiều Code này là quá cao siêu rồi. em làm theo a và chạy được rồi. Nhưng E chỉ cần 1 cái Function đơn giàn thôi không phải chạy tùm lum Sub ( gà như em nhìn như đám rừng bấm F8 chạy cũng ko biết gì luôn hihihi ) Vi du Function BoDau () + ô C2 = Giải Pháp Excel + cột D2 chì cần nhập "=BoDau(C2)" kết quả ô D2 là = Giai Phap Excel Em chỉ cần đơn giản vậy thôi. Nhờ A cứu giúp. Nhấp chuột vào đây để mở rộng...Thế thì bạn chỉ cần thêm code trong tập tin. Khi dùng thì ... Vd. công thức cho D2 Mã: Sao chép. =SourceToDest(C2;1;5) copy xuống dưới Không cần viết thêm hàm BoDau đâu.
locbanh
Thành viên chính thức 

Tham gia 5/5/13 Bài viết 70 Được thích 8 Cám ơn mọi người rất nhiều. ndduyen
Thành viên mới 
Tham gia 7/5/16 Bài viết 9 Được thích 12 Sử dụng công thức này ok này: Function BoDau(ByVal noiDung As String) As String Dim i As Long Dim iMa As Long Dim sChar As String Dim nChuyen As String BoDau = AscW(noiDung) For i = 1 To Len(noiDung) sChar = Mid(noiDung, i, 1) If sChar <> "" Then iMa = AscW(sChar) End If Select Case iMa Case 273 nChuyen = nChuyen & "d" Case 272 nChuyen = nChuyen & "D" Case 224, 225, 226, 227, 259, 7841, 7843, 7845, 7847, 7849, 7851, 7853, 7855, 7857, 7859, 7861, 7863 nChuyen = nChuyen & "a" Case 192, 193, 194, 195, 258, 7840, 7842, 7844, 7846, 7848, 7850, 7852, 7854, 7856, 7858, 7860, 7862 nChuyen = nChuyen & "A" Case 232, 233, 234, 7865, 7867, 7869, 7871, 7873, 7875, 7877, 7879 nChuyen = nChuyen & "e" Case 200, 201, 202, 7864, 7866, 7868, 7870, 7872, 7874, 7876, 7878 nChuyen = nChuyen & "E" Case 236, 237, 297, 7881, 7883 nChuyen = nChuyen & "i" Case 204, 205, 296, 7880, 7882 nChuyen = nChuyen & "I" Case 242, 243, 244, 245, 417, 7885, 7887, 7889, 7891, 7893, 7895, 7897, 7899, 7901, 7903, 7905, 7907 nChuyen = nChuyen & "o" Case 210, 211, 212, 213, 416, 7884, 7886, 7888, 7890, 7892, 7894, 7896, 7898, 7900, 7902, 7904, 7906 nChuyen = nChuyen & "O" Case 249, 250, 361, 432, 7909, 7911, 7913, 7915, 7917, 7919, 7921 nChuyen = nChuyen & "u" Case 217, 218, 360, 431, 7908, 7910, 7912, 7914, 7916, 7918, 7920 nChuyen = nChuyen & "U" Case 253, 7923, 7925, 7927, 7929 nChuyen = nChuyen & "y" Case 221, 7922, 7924, 7926, 7928 nChuyen = nChuyen & "Y" Case Else nChuyen = nChuyen & sChar End Select Next BoDau = nChuyen End Function locbanh
Thành viên chính thức 

Tham gia 5/5/13 Bài viết 70 Được thích 8 ndduyen đã viết: Sử dụng công thức này ok này: Function BoDau(ByVal noiDung As String) As String ............................... End Function Nhấp chuột vào đây để mở rộng...Cám ơn bạn nhiều L
lupin212
Thành viên mới 
Tham gia 25/3/10 Bài viết 5 Được thích 0 batman1 đã viết: Thế thì bạn chỉ cần thêm code trong tập tin. Khi dùng thì ... Vd. công thức cho D2 Mã: Sao chép. =SourceToDest(C2;1;5) copy xuống dưới Không cần viết thêm hàm BoDau đâu. Nhấp chuột vào đây để mở rộng...Phiền anh cho em hỏi, =SourceToDest(C2;1;5) ở đây 1 và 5 ý nghĩa là gì vậy ạ? //Em đang tìm tool để bỏ dấu, nhưng các hàm VBA trên mạng lại không đáp ứng đc một số tên, ví dụ: Lý Hùng Cường, mỗi tool của anh là tuyệt nhất nhưng em chưa hiểu ý nghĩa lắm. Cám ơn anh. B
batman1
Thành viên gạo cội



Tham gia 8/9/14 Bài viết 5,776 Được thích 9,819 lupin212 đã viết: Phiền anh cho em hỏi, =SourceToDest(C2;1;5) ở đây 1 và 5 ý nghĩa là gì vậy ạ? //Em đang tìm tool để bỏ dấu, nhưng các hàm VBA trên mạng lại không đáp ứng đc một số tên, ví dụ: Lý Hùng Cường, mỗi tool của anh là tuyệt nhất nhưng em chưa hiểu ý nghĩa lắm. Cám ơn anh. Nhấp chuột vào đây để mở rộng...Ở bài #6 trong tập tin đính kèm có đoạn Public Enum convert_dest dst_uni = 1 dst_vni = 2 dst_vn3 = 3 dst_windows1258 = 4 dst_khongdau = 5 End Enum Public Enum convert_source src_uni = 1 src_vni = 2 src_vn3 = 3 src_windows1258 = 4 End Enum Tức 1 = src_uni (dữ liệu nguồn là unicode), còn 5 = dst_khongdau (kết quả là chuỗi không dấu) vd. khác. 1. Nếu muốn chuyển từ unicode (dựng sẵn hay tổ hợp) sang unicode dựng sẵn thì KẾT QUẢ = SourceToDest(text; src_uni; dst_uni) = SourceToDest(text; 1; 1) Unicode dựng sẵn là khi dùng Unikey mà chọn bảng mã Unicode. Unicode tổ hợp là khi chọn bảng mã Unicode tổ hợp. 2. unicode -> windows1258: kết quả = SourceToDest(text; src_uni; dst_windows1258) = SourceToDest(text; 1; 4) L
lupin212
Thành viên mới 
Tham gia 25/3/10 Bài viết 5 Được thích 0 batman1 đã viết: Ở bài #6 trong tập tin đính kèm có đoạn Public Enum convert_dest dst_uni = 1 dst_vni = 2 dst_vn3 = 3 dst_windows1258 = 4 dst_khongdau = 5 End Enum Public Enum convert_source src_uni = 1 src_vni = 2 src_vn3 = 3 src_windows1258 = 4 End Enum Tức 1 = src_uni (dữ liệu nguồn là unicode), còn 5 = dst_khongdau (kết quả là chuỗi không dấu) vd. khác. 1. Nếu muốn chuyển từ unicode (dựng sẵn hay tổ hợp) sang unicode dựng sẵn thì KẾT QUẢ = SourceToDest(text; src_uni; dst_uni) = SourceToDest(text; 1; 1) Unicode dựng sẵn là khi dùng Unikey mà chọn bảng mã Unicode. Unicode tổ hợp là khi chọn bảng mã Unicode tổ hợp. 2. unicode -> windows1258: kết quả = SourceToDest(text; src_uni; dst_windows1258) = SourceToDest(text; 1; 4) Nhấp chuột vào đây để mở rộng...Tuyệt vời quá, cám ơn bác nhiều
Bài viết mới nhất
- SA_DQ
- 3/11/25
- Chia sẻ
- SA_DQ
- Hôm qua, lúc 04:54
- Làm việc với ngày tháng và thời gian
- phuongnam366377
- 31/1/26
- Excel và các ngôn ngữ lập trình khác
- SA_DQ
- Thứ năm lúc 04:27
- Những góp ý với diễn đàn
- hoaiantrinh
- Thứ ba lúc 14:58
- Hàm và công thức Excel
- Question Question
- ongke0711
- 6/10/24
- Lập Trình với Excel
- nguyendang95
- 6/7/25
- Excel và các ngôn ngữ lập trình khác
- Michael Bit
- Thứ hai lúc 08:44
- Hỏi đáp những vấn đề khác
- Dán lên cao
- Suggestion Suggestion
- GPE-Trợ Lý
- Thứ ba lúc 10:45
- Bài viết nổi bật và thông báo
- lehang0812
- 5/2/26
- TPHCM
- Đã giải quyết
- HeSanbi
- 18/4/21
- Lập Trình với Excel
- Đã giải quyết
- HeSanbi
- 5/3/21
- Lập Trình với Excel
- Dán lên cao
- Nguyễn Duy Tuân
- 13/9/24
- BLUESOFTS: A-Excel, A-Tools
- Excel my love_1
- 15/4/23
- Tin học mở rộng
- Question Question
- Quang_Hải
- 4/2/26
- Lập Trình với Excel
- HeSanbi
- 27/11/25
- Các Add-ins cho excel
- Question Question
- HeSanbi
- 2/2/26
- Lập Trình với Excel
- TranThanhPhong
- 30/4/14
- Dự án: Công thức & Hàm 97-2019
- giaiphap
- 8/8/15
- Các Add-ins cho excel
- vietdang170
- 28/1/26
- Các Add-ins cho excel
Thành viên có số lượng bài viết cao nhất tháng
- HeSanbi 14
- chothadiem 11
- Michael Bit 6
- HieuCD 5
- Gà Công Nghệ 5
- YêuCN 4
- Officexinh 4
- DeTong 4
- vietdang170 4
- pycckuu410 3
- chiendich 3
- hoanglocphat 3
- SA_DQ 3
- LOGANWover 2
- VietHoangPhan 2
- Gà Con yêu VBA 2
- Quang_Hải 2
- hoaiantrinh 2
- vuvannguyen1972 1
- viethung78 1
Thành viên có điểm tương tác cao nhất tháng
- HeSanbi 19
- GPE-Trợ Lý 9
- Quang_Hải 7
- HieuCD 6
- DeTong 5
- vietdang170 5
- Gà Con yêu VBA 4
- SA_DQ 4
- LOGANWover 3
- pycckuu410 3
- chiendich 3
- Phuocam 3
- hungvinh1402 2
- HUONGHCKT 2
- huhumalu 2
- YêuCN 2
- Officexinh 2
- 87kilua 2
- Hai Lúa Miền Tây 2
- Michael Bit 1
Thời gian đếm ngược.
000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025- Trang chủ
- Diễn đàn
- Những vấn đề chung
- Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…
Từ khóa » Bỏ Dấu Trong Excel Vba
-
Bỏ Dấu Trong Excel Bằng 4 Cách Phổ Biến Nhất
-
Hướng Dẫn Loại Bỏ Dấu Tiếng Việt Trong Excel Bằng VBA
-
Hướng Dẫn 2 Cách Loại Bỏ Dấu Tiếng Việt Trong Excel Mới Nhất
-
3 Cách Bỏ Dấu Chữ Tiếng Việt Trong Excel Nhanh, đơn Giản
-
2 Cách Bỏ Dấu Tiếng Việt Trong Excel đơn Giản Dễ Hiểu Nhất
-
Hướng Dẫn Cách Bỏ Dấu Trong Excel đầy đủ Nhất (update 2022)
-
3 Cách Bỏ Dấu Tiếng Việt Trong Excel đơn Giản, Chi Tiết Nhất - Unica
-
[HƯỚNG DẪN] Cách Bỏ Dấu Trong Excel: Chi Tiết Từ A đến Z - Tìm Việc
-
Hướng Dẫn Cách Loại Bỏ Dấu Tiếng Việt Trong Excel
-
[Tuts] 2 Cách Loại Bỏ Dấu Tiếng Việt Trong Excel Chính Xác Nhất
-
HƯỚNG DẪN LOẠI BỎ DẤU TIẾNG VIỆT TRONG EXCEL
-
Hướng Dẫn Cách Bỏ Dấu Trong Excel Có Hình ảnh Minh Họa Cụ Thể
-
VBA #31 Bỏ Dấu Tiếng Việt Trong Excel - YouTube
-
Hướng Dẫn Cách Loại Bỏ Dấu Tiếng Việt Trong Excel - YouTube
-
[Mới] Cách Bỏ Dấu Chữ Tiếng Việt Trong Excel Chi Tiết Nhất - CellphoneS
-
Hàm Bỏ Dấu Trong Excel - Thủ Thuật Tin Học
-
Hàm TRIM Trong Excel VBA - Thủ Thuật