☰

將 Excel 設定為預設在整個工作簿中搜尋

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 microsoft-office
將 Excel 設定為預設在整個工作簿中搜尋

在 Microsoft Excel 中，當我使用CTRL+搜尋時F，預設情況下它僅在當前工作表中搜尋。

如何將其設定為預設在整個工作簿中搜尋？我有Office 2010。這可能嗎？是否可以為特定工作簿或工作表設定此項目？如果需要的話，我可以接受註冊表編輯。

筆記：差不多 10 年後，我仍然想這樣做，但現在是針對 Excel 2016/2019。

答案1

您可以使用 ThisWorkbook 模組中的 Workbook_Open 巨集來執行此操作，如下所示：

Private Sub Workbook_Open()

Application.CommandBars.FindControl(ID:=1849).Execute
SendKeys "%(h){DOWN}{ENTER}{ESC}"

End Sub

這將為您所在的工作簿的會話設定它。

要使其始終成為預設值，您需要建立一個個人宏觀工作簿。

注意：原始答案的舊行：SendKeys "%(t)%(h)W~{ESC}"

答案2

我進行了修改，因此如果您的 Excel 是西班牙語（就像我的一樣），它可以工作

Private Sub Workbook_Open()

Dim lCountryCode As Long
lCountryCode = Application.International(xlCountryCode)

Application.CommandBars.FindControl(ID:=1849).Execute

Select Case lCountryCode
Case 34 'spanish
    SendKeys "%(p)%(D)L~{ESC}"
Case Else 'default english
    SendKeys "%(t)%(h)W~{ESC}"
End Select


End Sub

答案3

  1. 選擇主頁功能區中的「尋找/選擇」圖標

  2. 按一下尋找

  3. 點選右下角的「選項」框

  4. 左側有一個下拉式選單，上面寫著“內部”

  5. 選擇“工作表”或“工作簿”

這網站解釋如何更改預設值

答案4

我有類似的問題。我的工作簿中有按鈕。如果單擊該按鈕，我希望 Excel 打開查找對話框，其中已選擇“在所有工作簿中搜尋”選項，而不是預設的“工作表內”，無論如何。

此外，我希望按鈕能夠正常運作，無論選項是隱藏還是顯示，也無論是否有人手動進行更改。這很棘手，因為 Excel 預設不會在啟動時顯示選項，但會記住這些選項，並在下次有人顯示它們時再次顯示它們。

為了確保擊鍵有效，我們需要一系列擊鍵來設定設置，而不管初始狀態如何。花了很多功夫，但我找到了一個可行的方法。

這是我的 Excel 英文版程式碼，對於其他語言，您必須相應地更改鍵。

 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

您可以手動嘗試：

按 CTRL+F 出現查找對話方塊 按 TAB 15 次，以便您到達「選項」或「搜尋範圍」下拉清單。

按空白鍵或

1) 顯示選項或 2) 下拉式選單被啟動但沒有任何反應

按 Alt+T 兩次將遊標重設為尋找輸入框

無論如何，按 TAB 兩次，它都會帶您進入下拉列表中的搜尋（因為前面的步驟確保了選項實際上已顯示！）

按向下箭頭兩次選擇“工作簿”，然後按 ENTER 鍵選擇

按 ALT+T 兩次可將遊標重新重設至尋找輸入框。

希望這可以幫助其他有類似問題的人。很多谷歌搜尋只告訴我，不可能用 VBA 預先選擇“在所有工作簿中搜尋”，但這種方法有效！

要使其適用於不同的語言，您需要檢查語言並使用 CASE 透過正確的快捷鍵切換到正確的例程。

相關內容