Cách thức sử dụng Hàm Sendkey

[Mr.hieudoanxd]

Chào moi người trong diễn đàn!
Em có sử dụng hàm Sendkey cho một vài mục đích riêng. Khi sử dụng cho Worksheet em thường phải tạo một "nút bấm" có thể là một Shape hoặc 1 Active X Control để chèn Marco có chứa hàm Sendkey vào và chạy bằng Click vào Shape (Active X Control) đó. Vậy có phương án như thế nào để có thể sử dụng hàm Sendkey mà không phải tạo thêm Shape (Active X Control hoặc tương tự như thế) hay không ạ?

 

[Đình Phán]

Chào moi người trong diễn đàn!
Em có sử dụng hàm Sendkey cho một vài mục đích riêng. Khi sử dụng cho Worksheet em thường phải tạo một "nút bấm" có thể là một Shape hoặc 1 Active X Control để chèn Marco có chứa hàm Sendkey vào và chạy bằng Click vào Shape (Active X Control) đó. Vậy có phương án như thế nào để có thể sử dụng hàm Sendkey mà không phải tạo thêm Shape (Active X Control hoặc tương tự như thế) hay không ạ?

Vậy dùng sự kiện đi bạn. Có rất nhiều sự kiện, cả của Workbook và của Worksheet.
Ví dụ Workbook_Open, Worksheet_Change,...

 

[Mr.hieudoanxd]

Vậy dùng sự kiện đi bạn. Có rất nhiều sự kiện, cả của Workbook và của Worksheet.
Ví dụ Workbook_Open, Worksheet_Change,...

Em viết SendKey trên Useform bác. Cũng thử phương án từ useform tạo 1 Shape trên Sheet xong tiêm Marco vào nhưng dài dòng quá...

 

[VetMini]

Em viết SendKey trên Useform bác. Cũng thử phương án từ useform tạo 1 Shape trên Sheet xong tiêm Marco vào nhưng dài dòng quá...

Đưa code ấy lên đây, bà con có thể giúp cho bớt dài dòng.

 

[Mr.hieudoanxd]

Đưa code ấy lên đây, bà con có thể giúp cho bớt dài dòng.

Em test thử 1 file em đã thêm code tiêm Marco vào Commandbuttom1.
Em đang không muốn sử dụng code này. Anh có phương án nào hay hơn chỉ giúp em

 

[VetMini]

Tôi là dân "number cruncher", chỉ biết tính toán thôi chứ ba cái mớ lòng tong dốt lắm.
Bạn chịu khó chờ sẽ có người biết cái này giúp cho.

 

[ptm0412]

Thiết lập Userform với ShowModal = False

Private Sub CommandButton1_Click()
Sheet1.Select
Me.Hide
Application.SendKeys ("+{F11}")
Unload Me
End Sub

Không cần tiêm chích gì

 

[Mr.hieudoanxd]

Thiết lập Userform với ShowModal = False
Không cần tiêm chích gì

Là do em làm quá vấn đề lên rồi. Cảm ơn anh!