excel vba 高階過濾

excel vba 高階過濾

dim database as range '定義資料區域

dim criteria_range as range '定義條件區域

dim extract_field as range '定義結果區域

set database = sheets("man").range("a1").currentregion ' 資料區域 man **a1 據區域中的任何單元格，然後按ctrl +a選擇整個資料區域 空行空列就是currentregion 邊界

set criteria_range = range("a1", cells(1, range("iv1").end(xltoleft).column)).currentregion ' 篩選區域，條件區域 當前** 區域 a1 iv1 資料區域 碰到 空行 空列 不會選中 空行空列就是currentregion 邊界

set extract_field = range("a16", cells(16, range("iv16").end(xltoleft).column)) '結果區域

extract_field.currentregion.offset(1, 0).clear '清空 舊結果

''expression.advancedfilter(action, criteriarange, copytorange, unique)

'資料區域.advancedfilter(複製, 條件區域,結果區域, 一條或者多條)

'expression 必需。該表示式返回「應用於」列表中的物件之一。

'action xlfilteraction 型別，必需。

'xlfilteraction 可為以下 xlfilteraction 常量之一。

'xlfiltercopy

'xlfilterinplace

'criteriarange variant 型別，可選。條件區域。如果省略本引數，則沒有條件限制。

'copytorange variant 型別，可選。如果 action 為 xlfiltercopy，則本引數指定被複製行的目標區域。否則忽略本引數。

'unique variant 型別，可選。如果為 true，則重複出現的記錄僅保留一條；如果為 false，則篩選出所有符合條件的記錄。預設值為 false。

擴充套件學習

對選定的單元格輸入設定的內容91

sub

shaixuan() 
selection.formular1c1 = "91"
end sub

高階過濾器awk

一 簡單過濾功能 awk abc test awk abc test awk abc test 說明 預設情況下可以不加print 二 把一行拆分成字段 awk f abc test 意思是以 為分隔符，搜尋有abc的行並輸出第二個和第三個欄位的字元 awk f nr 3,nr 6 test 輸出第...

PHP 高階過濾器

檢測乙個數字是否在乙個範圍內 以下例項使用了 filter var 函式來檢測乙個 int 型的變數是否在 1 到 200 內 例項 int 122 min 1 max 200 if filter var int,filter validate int,array options array min...

SQL第5課 高階過濾資料

用來聯結或改變wehere子句中的子句的關鍵字，也稱為邏輯操作符。乙個and兩個條件，如果有多個條件，那麼兩個條件之間加乙個and 猜猜區別 select vend id,prod price,prod name from products where vend id dll01 or vend i...