資料結構
網路
關係資料庫管理系統 (RDBMS)
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C語言程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
服裝設計
法學如何在Excel中始終搜尋整個工作簿？
您可能多次使用過Excel中的“搜尋”或“查詢和替換”功能。它只會搜尋當前活動的工作表，但您是否嘗試過將搜尋應用於整個工作簿？此功能在Excel中預設情況下不可用，但我們可以透過使用Excel中的VBA程式碼來實現。當您同時處理多個工作表時，此過程可以幫助您節省大量時間。本教程將幫助您瞭解如何始終搜尋整個工作簿。
始終搜尋整個工作簿
在這裡，我們將插入一個VBA模組，然後執行程式碼來完成任務。讓我們來看一個簡單的例子，看看如何使用VBA程式碼始終搜尋整個工作簿。
步驟1
假設我們有一個Excel工作簿，其中包含多個類似於下面影像所示的工作表。
現在，要在整個工作簿中搜索，右鍵單擊任何工作表名稱，然後選擇“檢視程式碼”以開啟vba程式碼，然後單擊“插入”，然後單擊“模組”，並將程式鍵入文字框中，然後儲存檔案，如下面的影像所示。
程式
Sub FindReplace_WB()
'Updateby nirmal
Dim ws As Worksheet
Dim xFind As String
Dim xRep As String
Application.ScreenUpdating = False
On Error Resume Next
xFind = Application.InputBox("Find what", "Find", "", , , , , 2)
xRep = Application.InputBox("Replace with", "find", "", , , , , 2)
If xFind = "" Then
MsgBox "wrong...", vbInformation, "find"
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
步驟2
現在使用功能鍵F5開啟一個彈出視窗，如下圖所示。
我們可以使用此彈出視窗查詢和替換整個工作簿，在文字框中輸入單詞，然後單擊“確定”。
結論
在本教程中，我們使用一個簡單的示例演示瞭如何在Excel中搜索整個工作簿以突出顯示特定資料集。
更新於：2023年1月9日
609 次瀏覽
廣告