Lv,Gucci,Lv包包,Lv錢夾,Lv手錶,Lv目錄,Gucci公仔包,Lv購物包,Lv水桶包,Lv批發,愛美仕名牌購物

LV,GUCCI,ROLEX,名牌批發,包包,手錶,台灣三聯皮具,Lv,Gucci三聯皮具,Lv包包,Lv錢夾,Lv手錶,Lv目錄,Gucci公仔包,Lv購物包,Lv水桶包,Lv批發,購買證明,Lv,Gucci,Lv包包,Lv錢夾,Lv手錶,Lv目錄,Gucci公仔包,Lv購物包,Lv水桶包,Lv批發,lv批發與零售,包括lv包,lv手袋,lv錢包,lv皮夾,lv皮包,lv銀包等.LV2010新款,lv名牌包包目錄,lv皮夾目錄,lv目錄照片,lv包包型號同步lv官方網站和lv專門店.最新lv官網lv名牌包包照片!lv名牌包包目錄新款促銷活動,購買lv包包到愛美仕名牌購物

部落格全站分類：攝影寫真

Sep 18 Tue 2012 18:30
EXCEL篩選一定要選黑三角形再選自訂嗎??

謝謝版主
~
Sub test02()
    Dim Af As AutoFilter
    Dim strNo1$, strNo2 As String
    Set Af = Worksheets("管制表").AutoFilter
    ' 如篩選存在,解除篩選
    If Not Af Is Nothing Then [A1].AutoFilter
    strNo1 = InputBox("請輸入查詢號" & Chr(10) & "例: 0A0-0000")
    '以第10列為篩選啟始
    Rows("10:10").AutoFilter
    '進行條件篩選
    Selection.AutoFilter Field:=2, Criteria1:="=*" & strNo1 & "*", Operator:=xlOr, _
    Criteria2:="=%"
End Sub