Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/23.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 是否列出数组中包含单词的所有单元格?_Excel - Fatal编程技术网

Excel 是否列出数组中包含单词的所有单元格?

Excel 是否列出数组中包含单词的所有单元格?,excel,Excel,我有一份电子表格,里面有关于两点之间互联网连接的信息。B列提供了连接的小说明,例如1Gb都柏林到伦敦。我想创建一个新的工作表,我可以在其中键入一个位置,例如都柏林,并列出所有包含单词都柏林描述的单元格 我确信这很容易,尽管我找不到解决办法。有人能帮我吗 使用带有包含…选项的自动过滤器。可以复制可见单元格并将其粘贴到新图纸上。有关参考信息,请参见:在要放置数据的工作表的工作表代码区域中插入以下宏: Private Sub Worksheet_Change(ByVal Target As Range

我有一份电子表格,里面有关于两点之间互联网连接的信息。B列提供了连接的小说明,例如1Gb都柏林到伦敦。我想创建一个新的工作表,我可以在其中键入一个位置,例如都柏林,并列出所有包含单词都柏林描述的单元格


我确信这很容易,尽管我找不到解决办法。有人能帮我吗

使用带有包含…选项的自动过滤器。可以复制可见单元格并将其粘贴到新图纸上。有关参考信息,请参见:

在要放置数据的工作表的工作表代码区域中插入以下宏:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim B As Range, sb As Range, r As Range, Lookit As Range, I As Long
    Set sb = Range("B1")
    Set B = Range("B:B")
    Set Lookit = Sheets("Report Summary").Range("B4:B388")
    If Intersect(Target, sb) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    v = sb.Text
    B.Clear
    sb.Value = v
    I = 2
    For Each r In Lookit
        vv = r.Value
        If InStr(vv, v) > 0 Then
            Cells(I, "B").Value = vv
            I = I + 1
        End If
    Next r
    Application.EnableEvents = True
End Sub
然后在单元格中键入一个值B1

由于它是工作表代码,因此安装和自动使用非常容易:

  • 在Excel窗口底部附近的选项卡名称上单击鼠标右键
  • 选择查看代码-这将打开一个VBE窗口
  • 粘贴内容并关闭VBE窗口
  • 如果您有任何顾虑,请先在试用工作表上试用

    如果保存工作簿,宏将与工作簿一起保存。 如果在2003年以后使用Excel版本,则必须保存 文件的格式为.xlsm而不是.xlsx

    要删除宏,请执行以下操作:

  • 如上所述打开VBE窗口
  • 清除代码
  • 关闭VBE窗口
  • 要了解有关宏的更多信息,请参阅:

    要了解有关事件宏(工作表代码)的详细信息,请参阅:


    必须启用宏才能使其工作

    你想要单元格的地址还是单元格的内容,或者两者都要??单元格的内容在这种情况下没有真正的用处。我将创建一个包含所有位置的下拉列表,然后显示该位置的所有连接,然后将一些公式应用于其他信息。这只是列出包含我正在搜索的单词的所有单元格的公式。基于VBA宏的解决方案可以接受吗?我不知道如何使用宏:/n当然可以,COUNTIF函数可以计算一个单词在数组中出现的次数,因此我可以想象直接列出它们的实例。我可以使用公式=INDEX('Report Summary'!B4:B388,MATCH(“&B1&','Report Summary'!B4:B388,0))在数组中找到第一个实例。问题是列出其余的实例