Excel的Find方法

Find   方法  
  參閱應用於示例特性應用於   WorksheetFunction   對象的   Find   方法。  
   
  在工作表中查找特定信息。  
   
  expression.Find(Arg1,   Arg2,   Arg3)  
  expression             必需。該表達式返回一個   WorksheetFunction   對象。  
   
  Arg1             String   類型,必需。工作表名稱。  
   
  Arg2             String   類型,必需。單元格區域名稱。  
   
  Arg3             Variant   類型,可選。精確限制查詢的參數名稱。  
   
  應用於   Range   對象的   Find   方法。  
   
  在區域中查找特定信息,並返回   Range   對象,該對象代表用於查找信息的第一個單元格。如果未發現匹配單元格,就返回   Nothing。本方法不影響選定區域或活動單元格。  
   
  有關在   Visual   Basic   中使用   Find   工作表函數的詳細信息,請參閱在   Visual   Basic   中使用工作表函數。       
  expression.Find(What,   After,   LookIn,   LookAt,   SearchOrder,   SearchDirection,   MatchCase,   MatchByte,   SerchFormat)  
  expression             必需。該表達式返回一個   Range   對象。  
   
  What             Variant   類型,必需。要搜索的
數據。可爲字符串或任意   Microsoft   Excel   數據類型。  
   
  After             Variant   類型,可選。表示搜索過程將從其之後開始進行的單元格。此單元格對應於從用戶界面搜索時的活動單元格位置。值得注意的是,After   必須是區域中的單個單元格。請記住搜索是從該單元格之後       開始的;直到本方法繞回到指定的單元格時,纔對其進行搜索。如果未指定本參數,搜索將從區域的左上角單元格之後開始。  
   
  LookIn             Variant   類型,可選。信息類型。  
   
  LookAt             Variant   類型,可選。可爲以下   XlLookAt   常量之一:xlWhole   或   xlPart。  
   
  SearchOrder             Variant   類型,可選。可爲以下   XlSearchOrder   常量之一:xlByRows   或   xlByColumns。  
   
  SearchDirection             XlSearchDirection   類型,可選。搜索的方向。  
   
  XlSearchDirection   可爲以下   XlSearchDirection   常量之一。    
  xlNext   默認值    
  xlPrevious    
   
  MatchCase             Variant   類型,可選。若爲   True,則進行區分大小寫的查找。默認值爲   False。  
   
  MatchByte             Variant   類型,可選。僅在選擇或
安裝了雙字節語言支持時使用。若爲   True,則雙字節字符僅匹配雙字節字符。若爲   False,則雙字節字符可匹配其等價的單字節字符。  
   
  SearchFormat             Variant   類型,可選。搜索的格式。  
   
  說明  
  每次使用本方法後,參數   LookIn、LookAt、SearchOrder   和   MatchByte   的設置將保存。如果下次調用本方法時不指定這些參數的值,就使用保存的值。設置這些參數將更改“查找和替換”對話框中的設置,如果您忽略參數,更改“查找和替換”對話框中的設置將更改使用的保存值。若要避免這種問題的出現,每次使用該方法時請明確設置這些參數。  
   
  可以使用   FindNext   和   FindPrevious   方法重複搜索。  
   
  當搜索到指定的搜索區域的末尾時,本方法將繞回到區域的開始繼續搜索。發生繞轉後,若要停止搜索,請保存第一個找到的單元格地址,然後依據該保存地址測試每個後續查找到的單元格地址。  
   
  若要進行更爲複雜的模式匹配查找,請用   For   Each...Next   語句和   Like   運算符。例如,下列代碼在單元格區域   A1:C5   中搜索字體名稱以“Cour”開始的單元格。當   Microsoft   Excel   找到匹配單元格以後,就將其字體改爲“Times   New   Roman”。  
   
  For   Each   c   In   [A1:C5]  
          If   c.Font.Name   Like   "Cour*"   Then  
                  c.Font.Name   =   "Times   New   Roman"  
          End   If  
  Next  
   
  示例  
  本示例在工作表的單元格區域   A1:A500   中查找包含值   2   的所有單元格,並將這些單元格的值更改爲   5。  
   
  With   Worksheets(1).Range("a1:a500")  
          Set   c   =   .Find(2,   lookin:=xlValues)  
          If   Not   c   Is   Nothing   Then  
                  firstAddress   =   c.Address  
                  Do  
                          c.Value   =   5  
                          Set   c   =   .FindNext(c)  
                  Loop   While   Not   c   Is   Nothing   And   c.Address   <>   firstAddress  
          End   If  
  End   With   
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章