我尝试使用这个链接:Clicking a hyperlink in Excel to set autofilter on a different sheet和它的另一个后续链接:Autofilter a table in another sheet based on selected cell value where autofilter needs to be 'contains'
但我比其他人更新,更迷茫。我有两张床单。帐户(Sheet1)。每个帐户一行(无重复项)。CustomerNames (Sheet2)的每个帐户可能有多个行/名称。
我想要做的是单击Sheet1中的帐户名(F2 =列标题),让它读取它前面的单元格(E列),该单元格有一个数字(因为在我的sheet2上名称可能不相同)
然后,表2在帐户中有一堆客户名称。我想让这个表筛选出与sheet1列E上双击的账号相对应的账号。在工作表2上,与sheet1列E匹配的数据在D列。
我的标题在第2行,我的表在两个工作表上都从第2行开始。
我甚至不能让双击来做任何事情。它甚至看起来都不像我的宏试图运行。我不知道粘贴我尝试过的内容会有什么帮助。我刚刚尝试编辑在我提到的链接上找到的另一个VBA。
我需要做些什么来设置双击部件吗?
我的代码:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell.Offset(0, -1) = 6 Then
Sheet2.ListObjects("CustomerNames").Range.AutoFilter Field:=4, Criteria1:=ActiveCell.Value
Sheet2.Activate
End If
End Sub
发布于 2019-11-18 21:20:51
如果我理解你的问题,试着这样做:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 6 Then
Sheet2.ListObjects("CustomerNames").Range.AutoFilter Field:=4, Criteria1:=Target.Offset(,-1).Value
Sheet2.Activate
End If
End Sub
https://stackoverflow.com/questions/58922906
复制