軒云熊

回復 40# qaqa3296
你有試過我給你的最後一個 修改後的嗎?  我剛才測試一下 是可以的   
我的 思路是 規格 沒有 就找品名 如果品名在沒有就找品號    不知這樣的方向是不是對的   但是與準大的比對結果是一樣的
如果還有不正確的地方請你告訴我  希望你能夠給我一個機會可以學習  ^_^

軒云熊

回復 40# qaqa3296

剛才 測試一下  如果  品號跟規格 為空白  只找品名 如果是英文開頭 準大的是會顯示
   如果是中文開頭但  品號跟規格 為空白  不會顯示    唯一不同的地方在這
目前看到是這樣 但我不知道是不是你要的

qaqa3296

回復 41# 軒云熊

我的 思路是 規格 沒有 就找品名 如果品名再沒有就找品號    不知這樣的方向是不是對的   但是與準大的比對結果是一樣的
如果還有不正確的地方請你告訴我  希望你能夠給我一個機會可以學習  ^_^


不要找品名 ，直接跳過 ，應該就可以了。就達到我當初的需求。

放上結果檔

軒云熊

回復 43# qaqa3296

沒辦法 還是有差  格式太複雜 我投降了.. 不過還是把 檔案放上來 你看看吧 >"<  


javascript:;

軒云熊

結論是...不能用篩選...呵呵..

軒云熊

回復 43# qaqa3296
這是用 先比對  然後再比對結果與尋找範圍的相似度 最低的 再篩選  但還是有差...我把檔案放上來 你看一下...>"<  真的 ...沒辦法了..
會多M00027        煞車        6864        32 跟 M00025        車架        6844        0 因為裡面有相似度的問題..




javascript:;

qaqa3296

回復 46# 軒云熊

抱歉我的骨董電腦跑不動你的程式碼(96年買的 13年了)

庫存資料一多，每次案都當掉，無法幫你測試了...

你盡力了，我的電腦也盡力了...

軒云熊

回復 47# qaqa3296
抱歉  沒有整理就直接上傳 麻煩你在幫我測試一次 我想知道行不行  真的跑不動 就算了..  >"<

javascript:;

qaqa3296

回復 48# 軒云熊

測試過程有時會出現
執行階段錯誤91:
沒有設定物件變數或With區塊變數
錯誤範圍
   If ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible).Rows.Count <> 1 _
        Or ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible).Areas.Count <> 1 Then
但觸發條件不明

有時不知再讀什麼一直跑好多分鐘都沒結束....觸發條件不明

我才剛開始學習，研究你的程式看很久，測試出問題要幾小時。一個晚上就沒了..花太多時間找你程式的BUG

軒云熊

回復 49# qaqa3296
那是 判斷篩選結果是不是空值 我找到 GBKEE 大大以前寫的方式  拜託你在有空的話幫我在試一次看看還會不會這樣
我也是新手 希望我們可以互相學習  我也希望你不要測試的太晚 有空再測試就好了 我的想法是 先確定邏輯沒有問題之後
再往字典加陣列的方向前進 慢慢學習研究 一步一步來 如果真的不行 再把問題提出來 問大大們應該可以得到答案  
前提是你願意花時間  陪我一起學習研究   >"<       真的很謝謝你願意幫我測試


javascript:;