Chào mừng đến với Diễn đàn Dân Kế Toán - Kế toán tổng hợp thực tế.
Trang 2 của 2 Đầu tiênĐầu tiên 12
Kết quả 11 đến 12 của 12
  1. #11
    Ngày tham gia
    Nov 2015
    Bài viết
    2
    Ðề: viết code xong nhưng không thực thi lệnh

    Đúng là yêu cầu của bạn hơi thừa vì Exc có sẵn rồi , nhưng chắc bạn có lý do khác. Bạn tham khảo cách sử dụng phương thức Onkey trong file ví dụ của mình nhé.

    Bạn chuyển sang sheet bất kỳ sau đó về sheet2 (Mình muốn lợi dụng ActiveSheet khai báo Onkey). Giờ bạn nhấn F12 thử xem.

    Lưu ý: Phải xem xét cẩm thận trước khi dùng Onkey vì nó sẽ giành lấy quyền tác vụ của các phím chức năng đấy nhé. Vì vậy mà hiếm khi người ta Onkey trên phím Enter

    (Chết thật! Soạn xong mình chẳng biết gửi kèm file ra sao cả? Bạn tham khảo code như sau:



    Mã:
    Private Sub Worksheet_Activate()
    Application.OnKey "{F12}", "tbao"
    End Sub
    Và bạn thêm trong Module:



    Mã:
    Sub tbao()
    MsgBox "Sealand xin chao cac ban!"
    End Sub
    Thông cảm, mình chưa biết cách sử dụng tiện ích của diễn đàn)

  2. #12
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    ban nao viet dc code dạy mik

 

 
Trang 2 của 2 Đầu tiênĐầu tiên 12

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •