ワークブック全体で常に検索するにはどうすればよいですか？

Excelでは、[検索と置換]機能を使用すると、デフォルトで現在のワークシート内を検索します。常にすべてのシートで検索したい場合、[検索と置換]ダイアログの[オプション]ボタンで「シート」を「ワークブック」に変更し、毎回ワークブックを有効にする必要があります。どのように設定すれば、アクティブなシートではなく、デフォルトでワークブック全体を検索できるようになりますか？

VBAコードを使用して常にワークブック全体で検索する

Kutools for Excelを使用して常にワークブック全体で検索する

VBAコードを使用して常にワークブック全体で検索する

実際、Excelでデフォルトで検索範囲をワークブック全体に変更する直接的な方法はありませんが、以下のVBAコードを適用することで回避策として使用できます。このコードを使用すれば、このワークブックを開くたびに検索範囲を変更する必要がなくなります。

1. ALT + F11キーを押しながら押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. [挿入] > [ モジュール]をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBAコード: 常にワークブック全体で検索する:

Sub FindReplace_WB()
'Updateby Extendoffice
    Dim ws As Worksheet
    Dim xFind As String
    Dim xRep As String
    Application.ScreenUpdating = False
    On Error Resume Next
    xFind = Application.InputBox("Find what", "Kutools for Excel", "", , , , , 2)
    xRep = Application.InputBox("Replace with", "Kutools for Excel", "", , , , , 2)
    If xFind = "" Then
        MsgBox "wrong...", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    For Each ws In ThisWorkbook.Worksheets
        ws.UsedRange.Replace What:=xFind, Replacement:=xRep, LookAt:=xlWhole
    Next ws
    On Error GoTo 0
    Application.ScreenUpdating = True
End Sub

3. そして、F5キーを押してこのコードを実行し、表示されたダイアログボックスに、検索内容と置換内容をそれぞれ入力してください。スクリーンショットをご覧ください：

4. その後、[OK]をクリックすると、ワークブック全体で必要な値がすべて置き換えられます。

5. ワークブックをExcelマクロ有効ワークブック形式で保存してください。次回、このワークブックを開いたときに、常にこのコードを使用してワークブック全体で検索できます。

Kutools for Excelを使用して常にワークブック全体で検索する

Kutools for Excelを持っている場合、ナビゲーションペイン機能を使用して、ワークシート、ワークブック全体、または複数の開いているワークブック内で自由に検索や置換を行うことができます。

Kutools for Excelをインストール後、次の手順を行ってください：

1. [Kutools] > [ナビゲーション]をクリックします。スクリーンショットをご覧ください：

2。 ナビゲーション ペインで、 ボタンをクリックして ナビゲーションオプションに移動します。オプションセンターで、目的に応じてデフォルトの範囲を指定してください。 検索と置換 セクションで、今回は 現在のワークブックを選択します。スクリーンショットをご覧ください：

3。次に OK ボタンをクリックし、ワークブックを閉じて再度開いて設定を有効にします。これで、 ナビゲーション ペインに移動し、 ボタンをクリックして 検索と置換 機能をアクティブにします。 検索と置換 ペインで、次の操作を行ってください：

(1.) 「Within」セクションで、デフォルトの範囲が現在のワークブックに変更されていることが確認できます；

(2.) 「置換」タブで、検索したいテキストと置換したいテキストをそれぞれ「検索内容」と「置換内容」のテキストボックスに入力します；

(3.) 次に、「すべて置換」ボタンをクリックして、現在のワークブック内の必要なテキストを置換します。

今すぐKutools for Excelを無料ダウンロード！

4. 今後は、どのワークブックを開いても、Kutoolsの[検索と置換]機能を使用する際、検索範囲はデフォルトで現在のワークブックになります。