12345678910
返回列表 上一主題 發帖

[發問] 多條件篩選&ListBox

starbox520

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

論壇榮譽勳章論壇贊助勳章
51# 跳轉到 »
發表於 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
      
       tx00001223.zip (792.4 KB)

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
52#
發表於 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

starbox520

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

論壇榮譽勳章論壇贊助勳章
53#
發表於 2016-12-23 20:23 | 顯示全部帖子
回復 104# c_c_lai


    [attach]26189[/attach]

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

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
54#
發表於 2016-12-23 20:25 | 顯示全部帖子
回復 104# c_c_lai


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

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
55#
發表於 2016-12-23 20:30 | 顯示全部帖子
回復 107# c_c_lai

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

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
56#
發表於 2016-12-23 20:50 | 顯示全部帖子
回復 109# c_c_lai


    恩到底要怎麼解釋XD
    你可以參照我最後附的圖解
    因為3-5種篩法   是比對工作表2  對吧~
    現在就是在做比對前 ，  如果比對到這3種字串   BGA  .  QFN  .  QFP
    因為我們之前的條件是如果BGA=BGA  才算找到一樣的
  
    但現在變成說  遇到上述這3種字串，  XXBGA   =BGA     XXQFN  = QFN   XXQFP  =QFP
                                                                      BGA   =XXBGA      QFN = XXQFN     QFP  =XXQFP

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
57#
發表於 2016-12-23 20:58 | 顯示全部帖子
回復 109# c_c_lai


    都要把它看成一樣~
     以人來判讀的話就像我篩選的時候，我看到QFBGA   我就會去工作表2   把有BGA這3個字都篩出來    (BGA   .  XXBGA....)
                                                                     看到  GG QFN     我就會去工作表2   把有QFN這3個字的都篩出來

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
58#
發表於 2016-12-23 21:05 | 顯示全部帖子
回復 113# c_c_lai


    C大您先去休息XD

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
59#
發表於 2016-12-24 16:04 | 顯示全部帖子
回復 117# c_c_lai


    這邊的部分是我  例如你看到SQH191
    他不可能出現在兩筆數據上面~
    如果使用者手殘，一直點按鈕的話
    就會出現這種Bug
    但我試過debug原因好像是出在我後面IJKL欄  不會先Clear掉~"~
    導致每次按鈕按下去比對的時候
    會出現錯亂哈哈
    我有個想法就是我在ArrangeMent這邊
  1. If N = 0 Then Exit Sub
  2.     With Sheets("工作表2")
  3.    .[A2].Resize(N, 8) = Brr
  4.   
  5. End With
  6. If N = 0 Then Exit Sub
  7.     With Sheets("量大未排機")
  8.    .[A2].Resize(N, 8) = Brr
  9.    End With
  10. End Sub
複製代碼
量大未排機部分
改成   .[A2].Resize(N, 12) = Brr
這樣每次就會更新到後面這4行
在按下我設計的"量大未排機"按鈕
似乎就比較不會出錯
不過這只是我的想法XD...
因為我發現這樣改的話後面會變成跑"N/A"出來


所以C大懂我BGA.QFN.QFP  這3種特殊的狀況做判斷
再說什麼了嗎哈哈

TOP

starbox520

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

論壇榮譽勳章論壇贊助勳章
60#
發表於 2016-12-24 16:46 | 顯示全部帖子
回復 119# c_c_lai


    換我眼花了我沒看到這行哈哈...
    剛剛測試過了!!
    沒錯哈哈~

TOP

        靜思自在 : 原諒別人就是善待自己。
12345678910
返回列表 上一主題