多條件篩選&ListBox - Excel程式區 - 麻辣家族討論版版

帖子: 192
主題: 15
精華: 0
積分: 194
點名: 0
作業系統: windows
軟體版本: office2010
閱讀權限: 20
性別: 女
註冊時間: 2016-9-22
最後登錄: 2020-8-28

論壇榮譽勳章論壇贊助勳章

105^# 跳轉到 »

發表於 2016-12-23 20:23 | 只看該作者

回復 104# c_c_lai

[attach]26189[/attach]

篩法會像這樣
但現存資料可能量還不足，但WIP每日會更新
有可能未來會因為增加這3個特殊條件，抓到漏網之魚
目前當下可能只能手KEY測試
但因我把整理工作表2的執行寫在每點下去都會執行一次
所以還得先拿掉才能測試出來
[attach]26190[/attach]

TOP

c_c_lai

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

104^#

發表於 2016-12-23 19:44 | 只看該作者

回復 103# starbox520

TOP

starbox520

中學生 Rank: 2

帖子: 192
主題: 15
精華: 0
積分: 194
點名: 0
作業系統: windows
軟體版本: office2010
閱讀權限: 20
性別: 女
註冊時間: 2016-9-22
最後登錄: 2020-8-28

論壇榮譽勳章論壇贊助勳章

103^#

發表於 2016-12-23 18:44 | 只看該作者

本帖最後由 starbox520 於 2016-12-23 18:46 編輯

回復 102# c_c_lai

抱歉這邊是指
第3-5種篩選條件
是只有"TR排機&產出" 對上 "工作表2"
這個地方的條件原本應該是對應的欄位要全部一致才算正確
現在要多一個判斷就是
   比對前 BGA.QFN.QFP  這3種特殊的狀況需做另外判斷
   不管前面加了什麼(XXXBGA =  BGA . XXXQFN  = QFN. XXXQFP = QFP  )
   也就是
   BGA(=VFBGA / LFBGA / UFBGA / HS BGA / FCBGA / HFC BGA / FBGA / TFBGA / LBGA / PBGA...)
   VFBGA(=BGA / LFBGA / UFBGA / HS BGA / FCBGA / HFC BGA / FBGA / TFBGA / LBGA / PBGA...)
   以此類推的概念
   QFN(=aQFN / cQFN...)
   QFP(=TQFP/LQFP...)
   以上是可能會出現的字串，但我只是想表達說不管前面多了什麼他們其實都是一樣的東西

TOP

c_c_lai

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

102^#

發表於 2016-12-23 17:26 | 只看該作者

回復 101# starbox520

TOP

starbox520

中學生 Rank: 2

帖子: 192
主題: 15
精華: 0
積分: 194
點名: 0
作業系統: windows
軟體版本: office2010
閱讀權限: 20
性別: 女
註冊時間: 2016-9-22
最後登錄: 2020-8-28

論壇榮譽勳章論壇贊助勳章

101^#

發表於 2016-12-23 13:17 | 只看該作者

回復 99# c_c_lai

先前的篩選條件中，"TR排機&產出" 的 "Package"欄位
可否在比對前增加BGA.QFN.QFP 這3種特殊的狀況做判斷
BGA(=VFBGA / LFBGA / UFBGA / HS BGA / FCBGA / HFC BGA / FBGA / TFBGA / LBGA / PBGA...)
QFN(=aQFN / cQFN...)
QFP(=TQFP/LQFP...)
因此這邊直接判定這3種型態的，只要讀到BGA.QFN.QFP ，不管前面加了什麼(XXXBGA . XXXQFN. XXXQFP)都判定為一樣的東西
______________________________________下面是我新增的程式碼，但是有Bug...________________________________________________________

我在ListBox上有新增一個Botton(量大未排機)，但是處理完後，發現我的程式碼好像判讀有問題... 照理"TR排機&產出"上的"機台編號"，對應的反灰資料部分(E.F.G.H欄)
一個機台編號應該只會出現一次，但有可能對應到的"量大未排機"表中，有可能一筆資訊會同時有1-4種不同的機台編號
意思是:出現過的機台編號應不該再出現了，Private Sub CommandButton2_Click()
有的時候會出現下面附圖

我在前置作業有先處理WIP的資料 1.S欄篩出LS1T|LS1N|TR|BK|VQ 字串，其餘的不要
                                                               2.將J欄的"G"R欄的"R"篩出來，其餘的不要
                                                               3.'N欄的時間，以當前系統時間 + 4HRS 內篩出來，空白無時間資料的篩出來，其餘的不要(其餘的指不在這4HRS以內的資料)
                                                               4."U"欄急貨單號，有任何值，在"I"欄Schedule加上*號
                                                               之後再寫到Sheet1
   這邊有一個問題是，我的用法也會更改到WIP上的資料，*號部分
   但問題在使用者，如果手殘一直點的話，這個星號會無止進的增加**********會變成一大堆...
   然後我發現我篩完後貼去Sheet1的部分，有的時候會殘留之前的資料
   ->WIP的資料每天會做更新，我試過好像要把Sheet1的資料整個刪除掉在去執行，比較不會出問題...
         這邊我是在"TR排機&產出" 做一個WIP更新的按鈕，之前有想過把這個執行也一同放入 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      但是跑起來會很久，而且有時候顯示的資料會錯誤，因此最後才用了這個辦法...這部分有更好的作法嗎~

   配上C大之前幫忙修改的，ListBox1 & ListBox2 皆會使用到工作表2跟Shee1
   Sub ArrangeMent() 是從WIP整理過後的資料 (Sheet1)計算出來的
   就是"工作表2"

   寫到工作表2的部分，我把執行放到  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   目前還沒看到錯誤，不知道放在這邊日後會不會有Bug