VBA Function Hàm Bỏ Dấu Tiếng Việt | Giải Pháp Excel

Giải Pháp Excel
  • 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 New 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
  • Facebook
  • Đóng góp
Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

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 Bởi: Tìm kiếm Tìm nâng cao…
  • Tìm bài viết mới
  • Tìm theo chuyên mục
Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

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
You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. VBA Function hàm bỏ dấu tiếng việt (1 người xem)
  • Thread starter Thread starter locbanh
  • Ngày gửi Ngày gửi 14/9/18
Liên hệ QC

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) locbanh

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

huuthang_bd

Chuyên gia GPE
Tham gia 10/9/08 Bài viết 8,941 Được thích 11,357 Donate (Momo) Donate 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

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

befaint

|||||||||||||
Tham gia 6/1/11 Bài viết 14,600 Được thích 19,843
hpkhuong đã 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"! :cool::cool: 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 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

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

Phuocam

Thành viên mới
Tham gia 16/5/13 Bài viết 4,807 Được thích 7,869
locbanh đã 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

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

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

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 :D em mù khoản này, may có bác hỗ trợ :D Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

Bài viết mới nhất

SA_DQ Các bạn hãy giúp mình tính tổng số ngày mà Bác Hồ sống trên nhân gian trên trang tính Excel (3 người xem)
    • Thích
  • SA_DQ
  • Hôm nay lúc 04:54
  • Làm việc với ngày tháng và thời gian
Trả lời 2 Đọc 25 1 phút trước DeTong D SA_DQ Có thể tô màu tiêu đề bài viết để làm nổi bật giữa những tiêu đề các bài đăng khác được chăng? (1 người xem)
    • Yêu thích
  • SA_DQ
  • Hôm qua, lúc 04:27
  • Những góp ý với diễn đàn
Trả lời 1 Đọc 73 Hôm qua, lúc 08:02 Hai Lúa Miền Tây Hai Lúa Miền Tây SA_DQ Copilot bình luận các ván cờ vua từng ngày. (1 người xem)
    • Thích
  • SA_DQ
  • 3/11/25
  • Chia sẻ
Trả lời 67 Đọc 2K Hôm qua, lúc 05:34 SA_DQ SA_DQ H Lọc giá trị duy nhất theo cụm (2 người xem)
  • hoaiantrinh
  • Thứ ba lúc 14:58
  • Hàm và công thức Excel
Trả lời 7 Đọc 194 Thứ tư lúc 22:43 87kilua 87kilua ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (2 người xem)
    • Thích
    • Yêu thích
    • Cảm ơn
  • ongke0711
  • 6/10/24
  • Lập Trình với Excel
5 6 7 Trả lời 624 Đọc 92K Thứ tư lúc 18:19 tombongtep T N Tạo COM Add-In bằng Visual C++
    • Thích
  • nguyendang95
  • 6/7/25
  • Excel và các ngôn ngữ lập trình khác
Trả lời 18 Đọc 2K Thứ ba lúc 21:07 nguyendang95 N M Bảo mật code VBA autocad!
  • Michael Bit
  • Thứ hai lúc 08:44
  • Hỏi đáp những vấn đề khác
Trả lời 12 Đọc 310 Thứ ba lúc 19:17 Michael Bit M GPE-Trợ Lý
  • Dán lên cao
  • Suggestion Suggestion
CHÚC MỪNG NĂM MỚI BÍNH NGỌ 2026
    • Thích
    • Yêu thích
    • Cảm ơn
  • GPE-Trợ Lý
  • Thứ ba lúc 10:45
  • Bài viết nổi bật và thông báo
Trả lời 0 Đọc 131 Thứ ba lúc 10:45 GPE-Trợ Lý GPE-Trợ Lý L Thu Chi Gia Đình
    • Cười
  • lehang0812
  • 5/2/26
  • TPHCM
Trả lời 5 Đọc 256 Thứ ba lúc 10:19 nguoiconxunui N HeSanbi
  • Đã giải quyết
FitRowXL v1.3 - Giãn dòng tự động và bổ trợ in ấn Excel (*01/2026 mới)
    • Thích
    • Yêu thích
  • HeSanbi
  • 18/4/21
  • Lập Trình với Excel
Trả lời 77 Đọc 30K Thứ hai lúc 19:00 chothadiem chothadiem HeSanbi
  • Đã giải quyết
LocalizeXL v1.73 - Làm nổi bật ô đang chọn và cuộn trang tự động (phiên bản 2026)
    • Thích
    • Yêu thích
    • Cảm ơn
  • HeSanbi
  • 5/3/21
  • Lập Trình với Excel
Trả lời 85 Đọc 18K Chủ nhật lúc 21:43 chothadiem chothadiem Nguyễn Duy Tuân
  • Dán lên cao
Phiên bản mới Add-in A-Tools AI v10 (2024)
    • Thích
  • Nguyễn Duy Tuân
  • 13/9/24
  • BLUESOFTS: A-Excel, A-Tools
Trả lời 62 Đọc 13K Thứ bảy lúc 18:10 Nguyễn Duy Tuân Nguyễn Duy Tuân E Giúp Đặt tên lại (Rename) cho hàng loạt các file PDF theo cùng 1 quy tắc
  • Excel my love_1
  • 15/4/23
  • Tin học mở rộng
Trả lời 4 Đọc 4K 6/2/26 luongha.ktqd L Quang_Hải
  • Question Question
Chia sẻ một thuật toán đơn giản để trộn cells
    • Thích
    • Yêu thích
  • Quang_Hải
  • 4/2/26
  • Lập Trình với Excel
Trả lời 12 Đọc 411 5/2/26 Quang_Hải Quang_Hải HeSanbi TaxCode v4.33 - Tra cứu mã số thuế từ tổng cục thuế, masothue và thuvienphapluat
    • Thích
    • Yêu thích
  • HeSanbi
  • 27/11/25
  • Các Add-ins cho excel
Trả lời 19 Đọc 3K 5/2/26 HeSanbi HeSanbi HeSanbi
  • Question Question
Tạo Add-in, tệp Excel, Word, Access tự động cập nhật phiên bản mới từ Cloud cho chính nó
    • Thích
    • Yêu thích
  • HeSanbi
  • 2/2/26
  • Lập Trình với Excel
Trả lời 1 Đọc 274 4/2/26 HeSanbi HeSanbi TranThanhPhong Hàm EXACT
    • Thích
  • TranThanhPhong
  • 30/4/14
  • Dự án: Công thức & Hàm 97-2019
Trả lời 3 Đọc 9K 3/2/26 ptm0412 ptm0412 giaiphap Add-Ins cho Excel 2007 -2016 32bit và 64bit (1 người xem)
    • Thích
    • Yêu thích
    • Ngạc nhiên
  • giaiphap
  • 8/8/15
  • Các Add-ins cho excel
4 5 6 Trả lời 518 Đọc 226K 3/2/26 Gà Công Nghệ Gà Công Nghệ V Một Excel add-in vibe coding
    • Thích
  • vietdang170
  • 28/1/26
  • Các Add-ins cho excel
Trả lời 18 Đọc 778 3/2/26 vietdang170 V H Xin giúp đặt điều kiện trong Conditional Formating
  • hoanglocphat
  • 2/2/26
  • Hỏi đáp những vấn đề khác
Trả lời 6 Đọc 237 3/2/26 Gà Con yêu VBA Gà Con yêu VBA Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

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
  • vietdang170 4
  • DeTong 4
  • pycckuu410 3
  • chiendich 3
  • hoanglocphat 3
  • LOGANWover 2
  • VietHoangPhan 2
  • Gà Con yêu VBA 2
  • Quang_Hải 2
  • hoaiantrinh 2
  • SA_DQ 2
  • huhumalu 1
  • vuvannguyen1972 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
  • vietdang170 5
  • Gà Con yêu VBA 4
  • SA_DQ 4
  • LOGANWover 3
  • pycckuu410 3
  • chiendich 3
  • DeTong 3
  • Phuocam 3
  • hungvinh1402 2
  • HUONGHCKT 2
  • YêuCN 2
  • Officexinh 2
  • 87kilua 2
  • Hai Lúa Miền Tây 2
  • Michael Bit 1
  • nguyendang95 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.…
Back Top Bottom

Từ khóa » Bỏ Dấu Tiếng Việt Bằng Vba