Muốn dùng Sendkeys như "CTR-V" mà không được ??

  • Thread starter Thread starter adboy
  • Ngày gửi Ngày gửi
Liên hệ QC

adboy

Thành viên mới
Tham gia
29/11/06
Bài viết
27
Được thích
1
Mình hiện đang viết đoạn code sau (gắn vào 1 nút Command trong Excel) :

Private Sub CommandButton1_Click()
Range("A1").Copy
SendKeys "%{TAB}", True
SendKeys "^(V)", True
End Sub

Mục đích của mình muốn Copy dữ liệu từ ô A1 trong Excel rồi dùng "Atl-Tab" nhảy đến cửa sổ Microsoft Word (đang mở sẵn) để paste vào, nhưng lại không paste được ?? Nếu thay Microsoft Word bằng Notepad lại thực hiện được !! Tại sao lại xảy ra hiện tượng này nhĩ ?? và mình muốn dán dữ liệu sang Word thì làm cách nào ???

Các bạn nào biết, chỉ mình nhe !! Thanks nhiều !
 
Chữ v nhỏ chứ đâu phải V này nhỉ
Nếu không đc nữa thì thêm cái dịch chuột sang phải một ký tự rồi paste cho chắc
Range("A1").Copy
SendKeys "%{TAB}", True
SendKeys "{right}", True
SendKeys "^(v)", True
 
Upvote 0
Hay quá, cám ơn bạn nhiều, chỉ đổi "V" thành "v" là oke, vậy mà mò hoài không ra.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom