查找命令不能对组中的 Mac 工作表在 Excel 正常工作

文章翻译 文章翻译
文章编号: 189629 - 查看本文应用于的产品
展开全部 | 关闭全部

症状

当您使用 查找 对话框查找特定的信息时,Microsoft Excel 的 Mac 仅查找出现的值位于活动工作表上 (即使您已选择多个包含此信息的工作表)。

如果信息不是活动的工作表上但位于的组 Excel 中的另一个工作表上为 Mac 可能具有该值 ; 组中最后一张工作表上查找出现但是,它不会搜索所有已分组的工作表之间。

注意: 这不是问题时使用 替换 命令。只 查找 命令将出现此问题。

原因

出现此问题的原因是在已分组的工作表之间不起作用 查找 命令。Excel Mac 帮助的状态是否选择了一组工作表,查找 命令搜索所有工作表的 Visual Basic 模块除外组中。这不是实际的行为。当您选择多个的工作表,并使用搜索信息的工作表上的 查找 命令位于仅在第一个匹配值的项。

替代方法

Microsoft 提供的编程示例只,用于说明不附带任何明示或暗示保证。这包括,但不限于对适销性或针对特定用途的适用性的暗示的担保。本文假定您熟悉演示了正在使用的编程语言以及用于创建和调试过程的工具。Microsoft 支持工程师可以帮助解释某个特定过程的功能,但他们不会修改这些示例以提供额外的功能或构建过程来满足您的具体要求。要变通解决此问题,可以使用 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. 文件 菜单 (或 Microsoft Excel X 为 Mac 中的 Excel 菜单),单击 关闭并返回到 Microsoft Excel
  6. 选择您要搜索该工作表 (组模式)。您的具体情况使用适当的方法:
    • 如果要选定两个或多个相邻的工作表,单击第一张工作表选项卡,然后按住 SHIFT 并单击最后一张工作表选项卡。

      -或者-
    • 如果要选定两个或多个不相邻的工作表,单击第一张工作表选项卡,然后按下命令并单击其他工作表的标签。

      -或者-
    • 如果要在工作簿中选择所有工作表,按住控制,和单击工作表选项卡,然后单击快捷菜单上的 选定全部工作表
  7. 工具 菜单上指向 ,然后单击
  8. 单击 FindData 宏,然后单击 运行。按出现的对话框提示进行操作。

参考

有关查找命令的详细信息,单击 帮助 菜单上的 Microsoft Excel Mac 帮助的、 在 Office 助手或应答向导中键入 查找或替换数据,然后单击 搜索 以查看返回的主题。

属性

文章编号: 189629 - 最后修改: 2007年1月23日 - 修订: 3.2
这篇文章中的信息适用于:
  • Microsoft Excel 2004 for Mac
  • Microsoft Excel X for Mac
  • Microsoft Excel 2001 for Mac
  • Microsoft Excel 98 for Macintosh
关键字:?
kbmt kbdtacode kbprb KB189629 KbMtzh
机器翻译
注意:这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇,语法或文法的问题,就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量,但是我们不保证机器翻译的正确度,也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。
点击这里察看该文章的英文版: 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