Chuột phải vào tên Sheet bị mất tác dụng xin giúp đỡ

[kieuhuy_bmt]

Excel trong máy của tôi ở mọi File đều không mở được nội dung khi chuột phải. Tôi đoán là do nguyên nhân mình cài đặt các Add-in hay VBA gì đó. Bây giờ kg biết sửa thế nào, xin các anh chị xem ảnh tìm nguyên nhân giúp.

 

[vanle33]

Excel trong máy của tôi ở mọi File đều không mở được nội dung khi chuột phải. Tôi đoán là do nguyên nhân mình cài đặt các Add-in hay VBA gì đó. Bây giờ kg biết sửa thế nào, xin các anh chị xem ảnh tìm nguyên nhân giúp.

Các menu chuột phải bị đóng băng hay không hiện ra 1 menu gì vậy bạn?

 

[kieuhuy_bmt]

bị mất tác dụng hoàn toàn. Nên mỗi lần muốn xóa sheet, di chuyển hay làm gì đó lại phải vào Fomas ở khay trên, rất là mất công. Bác Vanle33 còn ở máy kg, nhờ Bác vào temwi xem giúp ID là 581 580 577; Pss là 3677 hiện tôi đang mở máy

 

[kieuhuy_bmt]

Tôi thoát máy rồi, nhờ mọi người giúp đỡ

 

[vanle33]

Bạn tham khảo thêm ở đây bằng cách thử các code trong đó xem sao
http://www.giaiphapexcel.com/forum/showthread.php?22124-Lỗi-right-menu

 

[ego.bizzin]

Bạn thử làm theo các bước sau :

1# Ấn {alt+f11} để vào Microsoft Visual Basic
2# Ấn {ctrl+g} để hiện cửa sổ lệnh Immediate
3# Gõ lệnh sau rồi ấn {enter}
## Application.CommandBars("Cell").Reset
## Application.CommandBars("Workbook tabs").Reset
4# Khởi động lại Excel

(Tham khảo)

 

[kieuhuy_bmt]

có đoạn Code này bên bài trước http://www.giaiphapexcel.com/forum/showthread.php?22124-Lỗi-right-menu&p=154883#post154883
họ giải quyết được vấn đề còn máy tôi thì kg. Hay toi thực hiện kg đúng
Sub Test()
' Kich hoat tat ca cac menu cua thuc don Sheet
Dim AppCtr As Object
For Each AppCtr In Application.CommandBars("Ply").Controls
AppCtr.Enabled = True
Next
' bat lai menu danh muc sheet
Application.CommandBars("Workbook tabs").Enabled = True
End Sub

Tôi làm như sau nhưng vẫn kg được nhờ mọi người xem giúp

 

[vanle33]

có đoạn Code này bên bài trước http://www.giaiphapexcel.com/forum/showthread.php?22124-Lỗi-right-menu&p=154883#post154883
họ giải quyết được vấn đề còn máy tôi thì kg. Hay toi thực hiện kg đúng
Sub Test()
' Kich hoat tat ca cac menu cua thuc don Sheet
Dim AppCtr As Object
For Each AppCtr In Application.CommandBars("Ply").Controls
AppCtr.Enabled = True
Next
' bat lai menu danh muc sheet
Application.CommandBars("Workbook tabs").Enabled = True
End Sub

Tôi làm như sau nhưng vẫn kg được nhờ mọi người xem giúp

1) "kg được" là thế nào? Bạn đã chạy code như thế nào? Có báo lỗi gì không?
2) Bạn thử code ở #13 của link tôi đưa chưa?

 

[Quang_Hải]

có đoạn Code này bên bài trước http://www.giaiphapexcel.com/forum/showthread.php?22124-Lỗi-right-menu&p=154883#post154883
họ giải quyết được vấn đề còn máy tôi thì kg. Hay toi thực hiện kg đúng
Sub Test()
' Kich hoat tat ca cac menu cua thuc don Sheet
Dim AppCtr As Object
For Each AppCtr In Application.CommandBars("Ply").Controls
AppCtr.Enabled = True
Next
' bat lai menu danh muc sheet
Application.CommandBars("Workbook tabs").Enabled = True
End Sub

Tôi làm như sau nhưng vẫn kg được nhờ mọi người xem giúp

Theo mình thì thế này, cố nhớ lại xem bị như thế từ lúc nào, đã quậy phần nào
Sau đó cài office lại xem có bị không. Nếu cài lại mà ok thì nhất định phá tiếp để biết nguyên nhân.
Cài lại mất 15 phút thôi mà.

 

[kieuhuy_bmt]

Có lúc copy Code vào thoát ra báo như sau: Kg hiểu gì nhờ mọi người giải thích

 

[Quang_Hải]

Có lúc copy Code vào thoát ra báo như sau: Kg hiểu gì nhờ mọi người giải thích

Vậy té ra đây là 1 thành viên tẩy chay tiếng Anh đây.
Excel hỏi bạn có muốn lưu file này dưới dạng có chứa macro hay không có. Chọn Yes là lưu file không có macro, chọn No thì ngược lại