Giúp code chạy liên tục (1 người xem)

[congnguyen88]

Sub themmot()
Range("a1") = Range("a1") + 1
End Sub

Đoạn code này cứ mổi lần Click chuột thì giá trị ô A1 sẽ cộng thêm 1, vậy có cách nào đè luôn chuột trái thì code sẽ cộng thêm 1 liên tục khi nào thả tay ra thì thôi

 

[ndu96081631]

Sub themmot()
Range("a1") = Range("a1") + 1
End Sub

Đoạn code này cứ mổi lần Click chuột thì giá trị ô A1 sẽ cộng thêm 1, vậy có cách nào đè luôn chuột trái thì code sẽ cộng thêm 1 liên tục khi nào thả tay ra thì thôi

Chằng phải bạn đã hỏi đề tài này ở đây rồi sao:
http://www.giaiphapexcel.com/forum/...-tục-khi-đè-chuột-luôn-vào-nút-bấm&highlight=
Giờ cứ vào đó mà hỏi tiếp