標題: [發問] 下拉式選單連結篩選功能 [打印本頁]

---

作者: Michelle-W    時間: 2016-7-28 17:05     標題: 下拉式選單連結篩選功能

各位前輩好

最近又遇到一個問題，需要新增資料篩選的功能，
在毫無頭緒的狀況下到處爬文，看看別人的做法，
其中有看到"准提部林"大大的多條件搜尋與篩選，
我想詢問有沒有辦法在同一個頁面裡面處理這些資料?(現況工作表已經有點多)
舉個例子：
關鍵字在sheet2的B欄
資料在sheet1的B欄
想要在sheet1的B欄上方連結一個下拉式選單(或加個按鈕執行等方式)，選單裡面連結關鍵字
點選完下拉式選單後，下面的資料已篩選出含有關鍵字的內容
這個能做得到嗎? 或是使用VBA?


[attach]24763[/attach]

---

作者: 准提部林    時間: 2016-7-29 11:45

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2. With Target
   
3.      If .Address = "$B$1" Then
   
4.         If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
   
5.         If .Value = "" Then Exit Sub
   
6.         Range([A3], [A65536].End(xlUp).Cells(1, 2)).AutoFilter Field:=2, Criteria1:="=*" & .Value & "*"
   
7.      End If
   
8. End With
   
9. End Sub

複製代碼

[attach]24773[/attach]

---

作者: Michelle-W    時間: 2016-7-29 13:57

回復 2# 准提部林


謝謝准提部林的指點
我的需求就是這個!!!
原來可以對儲存格這樣使用~!!!
又學了一課~真的非常感謝您

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)