Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.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
Vba 根据所选单元格值自动筛选另一工作表中的表格,其中自动筛选需要为';包含';_Vba_Autofilter - Fatal编程技术网

Vba 根据所选单元格值自动筛选另一工作表中的表格,其中自动筛选需要为';包含';

Vba 根据所选单元格值自动筛选另一工作表中的表格,其中自动筛选需要为';包含';,vba,autofilter,Vba,Autofilter,我对VBA不太熟悉,因此我引用了此解决方案“”,但我需要自动筛选功能在工作表的目标列中查找包含选定值的单元格 这就是我所使用的,对于自动筛选来说,精确值与目标值匹配是很好的,但是如果目标值在字段中包含多个值,那么它就不会在筛选器中包含这些值: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If ActiveCell.Column = 3 Then Sheet1.L

我对VBA不太熟悉,因此我引用了此解决方案“”,但我需要自动筛选功能在工作表的目标列中查找包含选定值的单元格

这就是我所使用的,对于自动筛选来说,精确值与目标值匹配是很好的,但是如果目标值在字段中包含多个值,那么它就不会在筛选器中包含这些值:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If ActiveCell.Column = 3 Then
    Sheet1.ListObjects("target").Range.AutoFilter Field:=17, Criteria1:=ActiveCell.Value
    Sheet1.Activate
    End If
End Sub
我想我需要以某种方式将“Sheet1.ListObjects(“target”).Range.AutoFilter字段:=17,Criteria1:=ActiveCell.Value”部分更改为在字段17中查找值包含的内容,例如:

如果字段17查看此链接,并且我选择的ActiveCell.Value为“AA”,则VBA im使用的仅显示2个条目,而不是实际所在的4行

字段17(以下内容应显示在列布局中,而不是行btw中) AA,AB AA AA 自动控制 AF、AA、AB

非常感谢

解决了

标准1:=“”&ActiveCell.Value&“”