Saya punya masalah serupa. Saya memiliki tombol di buku kerja. Jika tombol diklik, saya ingin excel untuk membuka dialog temukan dengan opsi "cari di dalam semua buku kerja" yang sudah dipilih alih-alih dari standar "di dalam lembar", apa pun yang terjadi.
Selain itu saya ingin tombol berfungsi terlepas dari opsi yang disembunyikan atau ditampilkan dan apakah seseorang membuat perubahan secara manual. Ini rumit karena Excel per default tidak menunjukkan opsi saat memulai tetapi mengingat dan menampilkannya lagi di lain waktu jika seseorang menampilkannya sebelumnya.
Untuk memastikan penekanan tombol berfungsi, kami membutuhkan serangkaian penekanan tombol yang menetapkan pengaturan terlepas dari kondisi awal. Butuh sedikit mengutak-atik, tapi saya menemukan satu yang berfungsi.
Ini kode saya untuk versi bahasa Inggris dari Excel, untuk bahasa lain Anda harus mengubah kunci yang sesuai.
Sub Commanbutton_Click()
Cells(1, 1).Select
SendKeys "^f", True
SendKeys "{TAB 15}"
SendKeys " ", True
SendKeys "%t%t", True
SendKeys "{TAB 2}", True
SendKeys "{DOWN}{DOWN}{ENTER}", True
SendKeys "%t%t", True
End Sub
Anda dapat mencobanya secara manual:
Tekan CTRL + F untuk dialog temukan. Tekan TAB 15 kali sehingga Anda bisa masuk ke menu "Opsi" atau pada menu tarik-turun "Cari di dalam".
Tekan spasi dan salah satunya
1) Opsi ditampilkan atau 2) dropdown diaktifkan dan tidak ada yang terjadi
Tekan Alt + T dua kali untuk mengatur ulang kursor ke kotak input find
Tekan TAB dua kali, itu akan membawa Anda ke pencarian dalam dropdown, tidak peduli apa (karena langkah sebelumnya memastikan bahwa opsi sebenarnya ditampilkan!)
Tekan panah BAWAH dua kali untuk memilih "Buku Kerja" dan ENTER untuk memilih
Tekan ALT + T dua kali untuk mengatur ulang kursor ke kotak input find lagi.
Semoga ini bisa membantu orang lain yang memiliki masalah serupa. Banyak Googling hanya memberi tahu saya bahwa tidak mungkin untuk memilih kembali "pencarian di dalam semua buku kerja" dengan VBA tetapi cara ini berhasil!
Untuk membuatnya bekerja dengan berbagai bahasa, Anda perlu memeriksa bahasa dan menggunakan CASE untuk beralih ke rutin yang tepat dengan cara pintas yang tepat.