Đánh tiếng Việt trong VBA, msgbox hỗ trợ tiếng việt

▷ Khoá học “Học Excel, Có Việc Ngay”: ​
▷ Xem ngay “Tự động hoá Excel và báo cáo với VBA”:

▷ Theo dõi Facebook cá nhân:
▷ Blog cá nhân:
▷ Video được cung cấp miễn phí bởi

Khám phá thêm thật nhiều kiến thức với Học Excel Online:
▷ Học Excel, Có Việc Ngay:
▷ Hãy để VBA giúp bạn:
▷ Hiểu và phân tích dữ liệu với Excel:
Nhiều bạn đã có câu hỏi là vì sao không thể gõ được tiếng Việt trong trình soạn thảo VBA. Mục đích của việc gõ tiếng Việt hoặc ký tự Unicode trong trình soạn thảo VBA có thể là output ra 1 thông báo (Message Box) hoặc là điền dữ liệu cho vùng trên bảng tính, hoặc là sử dụng trong giao diện phần mềm nền Excel của các bạn. Vậy trình soạn thảo VBA có hỗ trợ tiếng Việt hay Unicode không? Câu trả lời là không, Microsoft không hỗ trợ điều này. Tuy vậy, chúng ta vẫn có thể ghi những nội dung tiếng Việt ra các vùng trên bảng tính, vẫn có thể hiển thị tiếng Việt trên message box được, hiện như thế nào thì mời các bạn theo dõi video hướng dẫn sau đây.

Xem thêm video học và các thủ thuật excel: https://mindovermetal.org/thu-thuat-excel/

Subscribe
Notify of
guest
13 Comments
Oldest
Newest Most Voted
Inline Feedbacks
View all comments
Triết Huỳnh Ngọc Minh

Làm thế nào sử dụng unicode trong InputBox?

Đào Xuân Hữu

mình làm theo hướng dẫn mà ko ra được đoạn code trên mà nó ra ntn
Sub Macro1()

'

' Macro1 Macro

'

'

Selection.TypeText Text:="h"

Selection.Paste

Selection.TypeText Text:=" "

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeText Text:="cel online"

End Sub

Sub Macro2()

'

' Macro2 Macro

'

'

Selection.TypeText Text:="h"

Selection.Paste

Selection.TypeText Text:=" "

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeText Text:="cel online gi"

Selection.Paste

Selection.TypeText Text:=" b"

Selection.Paste

Selection.TypeText Text:=" v"

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeText Text:=" qua m"

Selection.Paste

Selection.TypeText Text:=" th"

Selection.Paste

Selection.TypeBackspace

Selection.Paste

Selection.TypeText Text:=" th"

Selection.Paste

Selection.TypeText Text:="h "

End Sub

mong được trợ giúp

Bùi Quang Hùng

Làm thế nào để tăng cỡ chữ trong "msgbox hỗ trợ tiếng Việt" vậy ad ơi?, cỡ chữ hơi bé tôi muốn nó to thêm tí nữa.

thenguyen0078888

Danh sách menu gõ tiếng việt thì làm sao a

tinh nguyen thanh

em thấy có core để viết tiếng việt cho msgbox và cho cả userform mà anh. có thể lấy được cả biểu tượng của window ra làm biểu tượng cho msgbox. chữ msgbox có thể tô đâm và in nghiêng nưa. ai cần thì em gửi core cho ạ.

Pvn Atskmt

Rất tuyệt bạn à

Trí Nguyễn Đình

Hay quá. Giờ em mới biết có hàm Message Box khác hỗ trợ Unicode như thế.

Trung Lê

trinh phục kìa bạn

ĐT Nguyễn [Học Excel Online]

▷ Khoá học "Học Excel, Có Việc Ngay": ​http://bit.ly/ex101_dtnguyen
▷ Xem ngay "Tự động hoá Excel và báo cáo với VBA": http://bit.ly/vba101_dtnguyen
▷ Theo dõi Facebook cá nhân: https://fb.me/kuldokk
▷ Blog cá nhân: https://blog.hocexcel.online
▷ Video được cung cấp miễn phí bởi https://hocexcel.online

Khám phá thêm thật nhiều kiến thức với Học Excel Online:
▷ Học Excel, Có Việc Ngay: https://www.hocexcel.online/ex101
▷ Hãy để VBA giúp bạn: https://www.hocexcel.online/vba101
▷ Hiểu và phân tích dữ liệu với Excel: https://www.hocexcel.online/dv101

Nguyen Hoang Phuong

Cho mình hỏi 1 chút- Nếu ta viết code Range("A5:D10").Select có nghĩa là chon vùng A5:D10- Vậy nếu có vùng chon nao đó mà muốn lấy địa chỉ của nó thì code viết như thế nào.Vui long giúp mình.Cam on

ha pham

cho minh hoi sao code nay khong chay duoc
Sub xoa_in_nghieng()
Dim i As Integer
For i = 1 To 10
If Cells(i, 1).FontStyle = "Italic" Then
Rows(i).Delete
End If
Next
End Sub
cam on nhieu

Tin Phan

cám ơn thầy

Sáng Lê Văn

chinh phục chứ anh?