Excel VBA: cài đặt phím tắt thành Ctrl + Shift + 5


1

Tôi đã tạo ra một loạt các phím tắt để định dạng số, như sau. Tất cả trong số họ làm việc, trừ Ctrl+Shift+5, Ctrl+Shift+6Ctrl+Shift+7các phím tắt. Vấn đề có vẻ là với các phím tắt, bởi vì nếu tôi cố gắng sử dụng một chìa khóa ( Ctrl+Shift 1, 2, 3), với chức năng tương tự, sau đó nó hoạt động.

Application.OnKey "^+v", "pasteValues"
Application.OnKey "^+1", "'formatAs""" & "number" & """'"
Application.OnKey "^+2", "'formatAs""" & "number2" & """'"
Application.OnKey "^+3", "'formatAs""" & "date" & """'"
Application.OnKey "^+5", "'formatAs""" & "percentage" & """'"
Application.OnKey "^+6", "'formatAs""" & "percentage2" & """'"
Application.OnKey "^+7", "'formatAs""" & "general" & """'"

Tôi cũng đã chạy lại chức năng đặt các phím tắt, trong trường hợp bất kỳ bổ trợ hoặc thứ gì đó ghi đè các phím tắt của tôi.

Có ý kiến ​​gì không?

Câu trả lời:


1

Những người đã được chỉ định, xem kb

Ctrl + Shift +% Áp dụng định dạng Tỷ lệ không có vị trí thập phân.

Ctrl + Shift + ^ Áp dụng định dạng số Khoa học với hai chữ số thập phân.

Ctrl + Shift + & Áp dụng đường viền phác thảo cho các ô đã chọn.


Nhưng tôi không thể ghi đè lên chúng? Ví dụ: Ctrl+Shift+!"Áp dụng định dạng Số với hai vị trí thập phân, dấu phân cách hàng nghìn và dấu trừ (-) cho các giá trị âm.", Nhưng tôi có thể ghi đè lên nó.
pedropais

Bạn có chắc chắn macro của bạn ghi đè lên nó? Những lỗi nào bạn nhận được đối với một số mà bạn không nhận được cho những người khác?
Raystafarian

Application.OnKey "^+1", "'formatAs""" & "number" & """'"> hoạt động như dự định khi Ctrl+Shift+!được nhấn. Application.OnKey "^+5", "'formatAs""" & "percentage" & """'"> không làm gì khi Ctrl+Shift+%bị ép. Tôi thậm chí đã thêm một điểm dừng trên formatAshàm, nhưng nó không được gọi trong trường hợp thứ 2.
pedropais
Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.