Excel 在工作簿中的所有工作表中更改筛选器所需的VBA代码

如何通过在“主控”选项卡的下拉列表中选择一个值来筛选一个工作簿中的所有工作表

我在选项卡1（主选项卡）上有一个下拉列表。当我在此下拉列表中选择一个名称时，我希望所有工作表仅将特定列过滤到此名称。图片如下:

工作簿名称为“订单指南”

每一行都是不同的分销商名称，我总共有大约80行。每行/分发服务器都有一个布局相同的工作表（在同一工作簿中）。从橙色下拉列表中，当我选择“PIZZA”时，我希望每张工作表过滤列“E”以仅显示“PIZZA”项目

主选项卡表格和下拉选择

这就是我到目前为止所尝试的。虽然我所有的床单都是桌子，但这可能因为范围的原因而不起作用

Sub filterSheets()
Application.ScreenUpdating = False
Dim LastRow As Long
Dim ws As Worksheet
For Each ws In Sheets
LastRow = ws.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
ws.Range("C1:C" & LastRow).AutoFilter Field:=1, Criteria1:="ABC"
Next ws
Application.ScreenUpdating = True
End Sub

---

那些仅仅是你想要什么的陈述的问题在这里很快就会结束。为了提高获得答案的机会，你应该准确地解释问题是什么，以及你试图解决的问题。不是“我想做X”，而是“我想做X，但因为Y我遇到了问题-我尝试了C和D，但得到了一个错误K”哦，明白了，谢谢，蒂姆。