張貼者:2010年5月29日 上午6:37Administrator ExcelHelp
[
已更新 2010年5月29日 上午6:38
]
介紹 根據用戶指定的條件,把資料庫內的資料排序及篩選,資料有多少欄也可以。十分實用吧?!
用法很簡單,只要在執行巨集以後,選出檢索欄,巨集會馬上顯示檢索欄中所有獨一無二的值,然後再選要篩選出來的記錄,選項可以多於一個: 
按「篩選」後,畫面上只會顯示合符條件的記錄。很方便呢! 
程式碼 程式碼較複雜和長,不在此刊登,請下載附檔。
使用的指令/方法 - 對話框裡的ComboBox、ListBox、CommandButtons和AddItem。 - Sort及AdvancedFilter - Set
使用的函數/屬性 - CurrentRegion
注意地方 - 資料庫的四周必須為空行或空欄,否則屬性CurrentRegion會算錯。 - 用For Each...Next的時候,如果用作迴圈的範圍的橫向一字形的,你需要多加.Columns在後面,否則迴圈只會跑一次,如: For Each rI In rTemp.Columns cbKeyField.AddItem rI.value Next - 在「選出」欄裡不管全選也好,完全沒選也好,會當作光排序論。
已知問題/蟲 - 沒有
|
|
|
|
|
 Updating...
Administrator ExcelHelp, 2010年5月29日 上午6:38
|