[發問] 名次有並排時，則作雙列比對的語法。

Airman

詳如測試檔(內附範例和需求說明) : 測試檔(0529).rar (203.84 KB)

下載次數: 7

2019-5-29 03:32

Airman

回復 2# 准提部林
准大:
謝謝您的公式解。
小弟研讀完再作報告^^

Airman

回復 3# Scott090
Scott090大大 :
謝謝您再次賜教。

您是不是有修整程式?
初次測試，感覺執行速率變快了^^
等小弟研讀完貴程式後，再作測試報告。

Airman

回復 2# 准提部林

准大:
測試結果~答案全部正確~感恩^^

如果想將答案放置在CE : DH的話~
請問程式碼要怎麼改?
小弟有將AZ改為CE；將CC改為DH；BA改為CF；但AY要怎麼改?
AY不改或AY改為CD~答案都不對?
正如當初二位版主的公式解，小弟也是因為同樣問題而放棄，所以改求程式解^^"

PS : B74 :AX78的程式部分可以省略(移除)。

待您有空檔~再勞駕您~謝謝您^^

Airman

回復 3# Scott090
Scott090大大 :
測試結果~答案全部正確~感恩^^

研讀貴程式解後，您並不是雙層另寫一段，而是將但單層和雙層融會編寫~
執行的結果比只執行單層時的速率還快^^

謝謝您的耐心協助和指導~感恩^^

Airman

回復 8# Scott090
Scott090大大 : 早安!
您太有雅量了~萬分感激!
不用分開它~這個解答檔正是小弟所需

還有二個工序~小弟正在酌量如何作表格的結構為宜~不好意思，每天給您添麻煩~下星期您如果有空檔且不介意的話~再冒昧勞駕您費神~謝謝您!

祝:
週休假期愉悅

Airman

回復 10# 准提部林
准大 :
謝謝您重新費心整理單層和雙層的需求程式碼~感恩!
公式解在桌面測試6個檔案~耗時只有1秒多不到2秒~厲害!
沒有想到您們二位加了雙層~執行效率反而比只有單層時還快~佩服!

因為一期有49個檔案，一期又有6種排列，所以小弟先研究同樣5欄格式的均值,合數,尾數3種。
尚有另1個雙層和三層的工序，小弟也考慮是否需要?尤其三層是否能以雙層再人工檢視即可。

萬分感激您多日來耐心的指導和賜教
祝:
週休假日愉悅

Airman

回復 12# 准提部林
准大 :
小弟還沒有覺察出錯誤^^"
謝謝您的賜正~感恩^^

===============
不好意思。下列問題可否幫小弟看一下~
http://forum.twbts.com/thread-21814-1-1.html
謝謝您^^

If檔案名稱中沒有"均值" Then GoTo 101
            [B1:BK1].Clear
            For j = 1 To 49         '均值
                Cells(1, j + 1) = j
            Next
101:               With [B1:AX1]

但~檔案名稱中沒有"均值"的語法小弟不會編寫^^"

Airman

回復 14# 准提部林
准大 :
比對答案是小弟應盡的責任^^
謝謝您不吝耐心賜教~感恩^^

另題待您有空檔再麻煩您~謝謝您 !

Airman

回復 16# 准提部林
准大:
再次謝恩^^