Có cách nào gõ vào Menu có dấu không?

Liên hệ QC

ongtrungducmx25

Thành viên gạo cội
Tham gia
5/2/07
Bài viết
2,077
Được thích
1,987
Nghề nghiệp
GV
Có cách nào hổ trợ có dấu khi Tạo Menu không! Có file đính kèm
 

File đính kèm

không có cách nào bổ sung vào ngôn ngữ 47 bằng tiếng việt sau mình thấy! mình thấy các bạn tạo ra sheet="Menusheet" rồi gõ vào đó các trình đơn của menu sau đó lưu lại file.xls thôi chứ không file.xla đâu mình cũng làm được nhưng không như ý muốn
 

File đính kèm

Upvote 0
cái này mình làm được mà mình muốn hỏi là cái "MenWks" của bạn có cần khai bào gì không như "Menusheet" của mình không
code:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rngData As Range
If Target.Count > 1 Then Exit Sub
If Target.Row < 2 Then Exit Sub
If Target.Column > 8 Then Exit Sub
With ThisWorkbook.Sheets("MenuWks")
On Error Resume Next
ThisWorkbook.Names("Menu_Level").Delete
On Error GoTo 0
Set rngData = .Range(.[A2], .[A65536].End(xlUp).Offset(, 8))
ThisWorkbook.Names.Add _
Name:="Menu_Level", _
RefersToR1C1:="=" & rngData.Parent.Name & "!" & rngData.Address(True, True, xlR1C1)
End With
End Sub

bạn cho mình địa chỉ tạo menu có dấu của bạn làm cho mình đi! mình chỉnh sửa theo kiểu bạn nói thì không được rồi!
 
Lần chỉnh sửa cuối:
Upvote 0
đoạn code trên chỉ là cập nhật lại Name range "Menu_Level" thôi, vì khi tạo menu theo cái cũ thì nó sẽ tham chiếu đến Name này. Còn menu theo bangdiem_SB thì không sử dụng name, nên không cần thiết bạn ạ. Còn file trên thì mình đã cập nhật thêm language 47 dùm cho bạn.
Thân.
 
Upvote 0
zậy mình tạo menu ở ngoài sau đó cập nhật vào bằng cách ghi macro có được không khi đó save sas-add-in là được hã
 
Upvote 0
Web KT

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

Back
Top Bottom