以關鍵字篩選多個sheets的資料 - Excelㄧ般區

[原創] 以關鍵字篩選多個sheets的資料

熱烈參與勳章好學求知勳章

5^# 跳轉到 »

發表於 2013-5-12 02:50 | 只看該作者

回復 sunnyso

改成這樣好用多了

表頭我設好字型與顏色，只要一執行VBA後就會被清除? 有辦法不 ...
ML089 發表於 2013-5-11 16:19

1. 在AA欄設計表頭的字型與顏色等 (VBA Sheet)
2. 添加VBA OR篩選，在關鍵字前加#
3. 添加非VBA方法，當中沒有使用陣列和陣列函數（如small, min等），以及盡量避免使用IF函數（因此篩選後的資料順序是3個sheets交錯）。以免資料增加會令計算過長。

請指教。

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

4^#

發表於 2013-5-11 16:19 | 只看該作者

回復 3# sunnyso

改成這樣好用多了

表頭我設好字型與顏色，只要一執行VBA後就會被清除? 有辦法不被清除嗎?

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

熱烈參與勳章好學求知勳章

3^#

發表於 2013-5-11 16:10 | 只看該作者

回復 sunnyso

寫的不錯，構想也不錯

[1] 如果一開始沒有篩選關鍵字時，如何改為全部顯示

目前一列關 ...
ML089 發表於 2013-5-11 09:19

[1] 在 For Each sh In all_datasheets的Next 前加入, "Cells(dst_row, 1).Resize(src_rows, clmn1) = tmp_data" 即可

[2] 若要用OR 就要改動多一些代碼, 過兩天改一下放上來.

複製代碼

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

2^#

發表於 2013-5-11 09:19 | 只看該作者

回復 1# sunnyso

寫的不錯，構想也不錯

如果一開始沒有篩選關鍵字時，如何改為全部顯示

目前一列關鍵字的關係式是 AND，是否能多幾列為 OR

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。