下拉式選單連結篩選功能 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 下拉式選單連結篩選功能

返回列表下一主題上一主題發帖

[發問] 下拉式選單連結篩選功能

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2848
主題: 10
精華: 0
積分: 2903
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2026-7-25

1^# 跳轉到 »

發表於 2016-7-29 11:45 | 顯示全部帖子

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

複製代碼

資料篩選問題_V1.rar (10.12 KB)

靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。

返回列表下一主題上一主題