Dùng Sendkey không hoạt động

[chibi]

Chào cả nhà.
Tôi dùng SendKey để hiện hộp thoại Find and Replace mà không hoạt động. Cả nhà xem giúp nó lỗi chỗ nào. Xin cảm ơn nhiều.

 

[Quang_Hải]

Chào cả nhà.
Tôi dùng SendKey để hiện hộp thoại Find and Replace mà không hoạt động. Cả nhà xem giúp nó lỗi chỗ nào. Xin cảm ơn nhiều.

Câu lệnh đó chính xác rồi mà.

 

[nghiaphuc]

Chào cả nhà.
Tôi dùng SendKey để hiện hộp thoại Find and Replace mà không hoạt động. Cả nhà xem giúp nó lỗi chỗ nào. Xin cảm ơn nhiều.

Em thấy bình thường mà anh, nhấn nút lệnh là hiện hộp thoại Find and Replace, ở tab Find, nếu thay "^f" bởi "^h" thì sẽ mở hộp thoại này ở tab Replace. Có một điều thú vị: Nếu thay "^f" bởi "^F" thì sẽ mở hộp thoại Format Cells ở tab Font.

 

[ndu96081631]

Có một điều thú vị: Nếu thay "^f" bởi "^F" thì sẽ mở hộp thoại Format Cells ở tab Font.

Nó tương đương với Ctrl + Shift + f rồi còn gì

 

[chibi]

Cảm ơn mọi người. Nhưng trên máy của tôi nó ko chạy mới "đểu" chứ, bấm vào cái nút lệnh nó cứ đứng im, trong khi đó nếu ấn phím "Ctrl+f" thì bình thường. Lạ thật.

 

[chibi]

Mọi người có thể xem
[video=youtube_share;jmYJ9kW-Dss]http://youtu.be/jmYJ9kW-Dss[/video]

 

[ndu96081631]

Cảm ơn mọi người. Nhưng trên máy của tôi nó ko chạy mới "đểu" chứ, bấm vào cái nút lệnh nó cứ đứng im, trong khi đó nếu ấn phím "Ctrl+f" thì bình thường. Lạ thật.

Không được thì đổi cách khác!
Thử lệnh này xem thế nào:

CommandBars("Edit").Controls("Find...").Execute

Ai lại SendKeys cho.. dở ẹc