尋找] 指令無法處理跨 Excel Mac 群組中的工作表

文章翻譯 文章翻譯
文章編號: 189629 - 檢視此文章適用的產品。
全部展開 | 全部摺疊

徵狀

使用 [尋找] 對話方塊找出特定的資訊時 Mac 的 Microsoft Excel 只能使用中工作表上尋找上出現的值 (即使如果您選取了多張工作表包含這項資訊)。

如果資訊不是使用中工作表上,但位於 Excel 群組中的另一個工作表的 Mac 可能具有該值 ; 群組中最後一個工作表中尋找符合不過,它不會搜尋任何群組的工作表之間。

注意: 這並不會構成問題當您使用 [取代] 命令。只有 [尋找] 指令的展示區這個問題。

發生的原因

在 [尋找] 指令無法運作跨群組工作表,就會發生這個問題。Excel Mac 說明指出是否選取的工作表群組 [尋找] 指令搜尋所有工作表的 Visual Basic 模組除外群組中。這並不是實際的行為。當您選取多個工作表,並使用來搜尋資訊工作表上的 [尋找] 指令時,找到只有第一個出現的值。

其他可行方案

Microsoft 僅,為了說明提供程式設計範例,不提供任何明示或默示的保證。這包括,但不限於適售性或適合某特定用途之默示擔保責任。本文假設您已熟悉使用我們所示範的程式設計語言以及建立和偵錯程序所使用的工具。Microsoft 技術支援工程師可以協助解釋特定程序的功能,但它們不會修改這些範例以提供附加功能或建構程序,以符合您特定需求。如果要解決這個問題,您可以使用應用程式巨集 (Sub 程序) 的 Microsoft Visual Basic 來搜尋了在群組模式中選取每個工作表。 若要建立巨集,請依照下列步驟執行:
  1. 儲存並關閉任何開啟的活頁簿,然後再建立新的活頁簿。
  2. 在 [工具] 功能表上指向 [巨集,然後按一下 [Visual Basic 編輯器]。
  3. 插入] 功能表上按一下 [模組]。
  4. 在模組中輸入下列程式碼:
    Sub FindData()
    
       ' This Sub prompts you for a value and searches each worksheet
       ' that is selected in group mode. If it finds the search value,
       ' the routine prompts you to continue the search on the sheet.
       ' If it does not find the value on the sheet, it goes to the
       ' next sheet. You can cancel the search on the sheet by
       ' answering No to "Look for another value..." and then
       ' answering Yes to "Cancel the search ...".
       '
       ' WARNING: When this macro ends, the workbook will no longer be
       ' in group mode.
    
       testValue = InputBox("Enter the value to search for : ")
       For Each x In ActiveWindow.SelectedSheets
          x.Select
          Set foundcell = ActiveSheet.Cells.Find(testValue)
           If foundcell Is Nothing Then
               MsgBox "The word was not found"
           Else
               MsgBox "The word was found in cell " & foundcell.Address
               Range(foundcell.Address).Select
    
        LookAgain:
               response = MsgBox _
                   ("Look for another value on this sheet?", vbYesNo)
    
               ' If response = 6, we will not continue searching on
               ' this sheet.
               If response = 6 Then
    
                   ' Part2
                   Set foundcell = _
                       ActiveSheet.Cells.FindNext(after:=ActiveCell)
                   Range(foundcell.Address).Select
                   GoTo LookAgain
               End If
    
               If response = 7 Then
                   response = MsgBox("Cancel search ? ", vbYesNo)
                   If response = 6 Then End
                   GoTo NextSheet
               End If
           End If
    
      NextSheet:
          Next x
          MsgBox "Search is complete ....."
    
    End Sub
    					
  5. 在 [檔案] 功能表 (或 Mac 的 Microsoft Excel X 中的 Excel 功能表),按一下 [關閉並返回 [Microsoft Excel]。
  6. 選取您想要搜尋工作表 (群組模式)。您的情況使用適當的方法:
    • 如果想選取兩個或多個相鄰工作表按一下第一張工作表索引標籤,然後按住 SHIFT 鍵並按一下最後一個工作表索引標籤。

      -或者-
    • 如果想選取兩個或多個不相鄰的工作表按一下第一張工作表索引標籤和再按住指令並按一下 [其他工作表] 索引標籤。

      -或者-
    • 如果想在活頁簿中選取所有工作表按住控制,按一下工作表] 索引標籤然後再按一下快顯功能表上的 [選取所有工作表
  7. 在 [工具] 功能表上指向 [巨集,然後按一下 [巨集]。
  8. 按一下 FindData] 巨集,然後按一下 [執行]。依照上出現的對話方塊。

?考

如需有關 [尋找] 指令的詳細資訊,請按一下 [說明] 功能表上的 [Mac 說明的 Microsoft Excel,並在 「 Office 小幫手 」 或 「 解答精靈 」 中輸入 尋找或取代資料 然後按一下 [搜尋] 以檢視所傳回的主題。

屬性

文章編號: 189629 - 上次校閱: 2007年1月23日 - 版次: 3.2
這篇文章中的資訊適用於:
  • Microsoft Excel 2004 for Mac
  • Microsoft Excel X for Mac
  • Microsoft Excel 2001 for Macintosh
  • Microsoft Excel 98 for Macintosh
關鍵字:?
kbmt kbdtacode kbprb KB189629 KbMtzh
機器翻譯
重要:本文是以 Microsoft 機器翻譯軟體翻譯而成,而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章,讓使用者可以依其使用語言使用知識庫中的所有文章。但是,機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤,就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本:189629
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應,不負任何擔保責任。Microsoft及(或)其供應商謹此聲明,不負任何對與此資訊有關之擔保責任,包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。

提供意見

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com