[Hỏi] Cách gán phím tắt trên bàn phím

demdamsay · Đăng lúc 13/12/2017 08:02

Hãy đăng nhập để có nhiều chức năng hữu dụng hơn và xem ảnh rõ hơn!

Bạn phải đăng nhập để xem được nội dung, nếu bạn chưa có tài khoản? hãy Đăng ký mới

x

Nhờ mọi người giúp đỡ tôi vấn đề sau:
- Tôi xin được mạn phép gửi lại file đã tải trên diễn đàn của mình để làm mẫu.
- Ở đây. Tôi muốn gán nút bấm bàn phím trái và phải (Nút bàn phím mũi tên trái và mũi tên phải) vào 2 Code Tinh lai KL và Dinh dang. (2 Code này có sẵn trong file)
Xin chân thành cảm ơn ./.

demdamsay · Đăng lúc 13/12/2017 12:19

tranhoe gửi lúc 13/12/2017 09:59
Code ở file trên là gán vào nút bấm (CommandButon).
Để có thể gán phím tắt thay cho n ...

Dạ vâng. Thao tác đã thành công.
Cháu cảm ơn Chú rất nhiều.
Chúc chú sức khỏe ./.

tranhoe · Đăng lúc 13/12/2017 09:59

Code ở file trên là gán vào nút bấm (CommandButon).
Để có thể gán phím tắt thay cho nút bấm thì em soạn lại code và code này phải đặt trong module chứ không đặt trong sheets
Cách làm:
- Tạo mới 2 code: Sub DinhDang và Sub TinhLaiKhoiLuong trong module
- Trong ThisWorkbook thêm vào code sau:

[Visual Basic] 纯文本查看 复制代码

Private Sub Workbook_Open()
  Application.OnKey "{RIGHT}", "DinhDang"
  Application.OnKey "{LEFT}", "TinhLaiKhoiLuong"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
  Application.OnKey "{RIGHT}", ""
  Application.OnKey "{LEFT}", ""
End Sub

- Lưu file.
- Đóng file và mở lại xem thành quả

demdamsay · Đăng lúc 13/12/2017 14:12

tranhoe gửi lúc 13/12/2017 09:59
Code ở file trên là gán vào nút bấm (CommandButon).
Để có thể gán phím tắt thay cho n ...

Cháu Xin hỏi lại Chú là:
- Với cách làm như trên. Thì ở bất kỳ Sheet nào. Khi ta dùng phím mũi tên trái và phải. Nó đều thực hiện lệnh.
- Mong muốn: Bây giờ, Ta ấn định, chỉ cho phép thực hiện lệnh ở Sheet chỉ định sẵn (Cụ thể là Sheet: Khoi Luong). Thì có được không và ta phải làm thế nào.
Nhờ Chú và mọi người giúp đỡ ./.

tranhoe · Đăng lúc 13/12/2017 23:24

demdamsay gửi lúc 13/12/2017 14:12
Cháu Xin hỏi lại Chú là:
- Với cách làm như trên. Thì ở bất kỳ Sheet nào. Khi ta d ...

Thực sự thì anh không có thời gian, chỉ trả lời theo nguyên lý vận hành. Trong 4rum còn nhiều TV biết và rành hơn nữa.
Tóm lại: anh chỉ nói cái "nguyên lý", em cứ vọc sẽ tìm ra, kg phải anh dấu đâu.
Ngay như cái "nút qua trái", "nút qua phải" thì anh cũng nhờ ông GG trợ giúp thôi.
Vấn đề ở đây: em cứ đưa vào thủ tục Worksheet_SelectionChange chẳng hạn (nếu thao tác trên sheets này thì thực hiện thế này ....) hoặc Worksheet_Activate, Worksheet_Deactivate ...
A cũng tự học, chỉ nắm nguyên lý thôi; tự làm sẽ thấm sâu hơn.

demdamsay · Đăng lúc 14/12/2017 07:36

tranhoe gửi lúc 13/12/2017 23:24
Thực sự thì anh không có thời gian, chỉ trả lời theo nguyên lý vận hành. Trong 4rum c ...

Vâng. Dù sao thì cháu vẫn Cảm ơn Chú nhiều.
Để cháu vọc thêm xem có ra ngô ra khoai gì không.

Tài khoản		Ghi nhớ?	Quên mật khẩu
Mật khẩu			Đăng ký mới

[Hỏi] Cách gán phím tắt trên bàn phím

Hãy đăng nhập để có nhiều chức năng hữu dụng hơn và xem ảnh rõ hơn!

Cảm ơn!