Để hiển thị được Chữ Việt trong các thông báo của VBA bạn thực hiện theo cách sau đây:
B1. Mở file Word mới, bật chức năng Record Macro của MS Word.
B2. Gõ nội dung chữ Việt cần dùng để đưa vào thông báo của VBA.
Vd: Xin chào các bạn Hãy làm quen với VBA nhé!
B3. Vào cửa sổ VBA của Word >> Modunle >> New macro, copy đoạn thông báo chữ Việt rồi vào cửa sổ VBA của Excel sử dụng thông báo sau:
(Bạn có thể thử trước ngay trong Modunle của Word cũng được)
Application.Assistant.DoAlert “Thông báo”, “Xin chào và h” & ChrW(7865) & “n g” & ChrW(7863) & “p l” & ChrW(7841) & “i!”, 0, 4, 0, 0, 0
Chú ý: Mặc định tham số sau cùng trong lệnh Application…. là: 0, 4, 0, 0, 0
Note: Các bạn có thể tạo sẵn một danh sách các thông báo tiếng Việt để sau này sử dụng đỡ phải làm lại :))
Sub mrDao_TV() Dim tb1, tb2, tb3, tb4 As String tb1 = ChrW(272) & "ã th" & ChrW(7921) & "c hi" & ChrW( _ 7879) & "n xong!" tb2 = "Xin c" & ChrW(7843) & "m " & ChrW(417) & "n!" tb3 = "Xin ch" & ChrW(7901) & " trong giây lát!" tb4 = "N" & ChrW(7871) & "u có v" & ChrW(432) & ChrW( _ 7899) & "ng m" & ChrW(7855) & "c hãy liên h" & ChrW(7879) & " v" & ChrW( _ 7899) & "i tôi ngoccs.edu.vn" Application.Assistant.DoAlert "Thông báo", tb1 & Chr(10) & tb2 & Chr(10) & tb3 & Chr(10) & tb4, 0, 4, 0, 0, 0 End Sub
Cảm ơn đã xem bài viết
Xin chào, hẹn gặp lại ở bài viết kế tiếp