Airman

帖子: 315
主題: 51
精華: 0
積分: 367
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
註冊時間: 2015-9-29
最後登錄: 2021-10-12

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2019-5-29 03:33 | 只看該作者

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

詳如測試檔(內附範例和需求說明) :

測試檔(0529).rar (203.84 KB)

樓主熱帖

Airman

中學生 Rank: 2

帖子: 315
主題: 51
精華: 0
積分: 367
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
註冊時間: 2015-9-29
最後登錄: 2021-10-12

17^#

發表於 2019-6-2 09:23 | 只看該作者

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

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-23

16^#

發表於 2019-6-2 09:06 | 只看該作者

將自訂函數直接在工作表使用, 可測試其正確性:

(01)公式測試檔3.rar (12.98 KB)

為了避免"次數"皆為0的錯誤,以下改改
For i = 1 To U
Jr(i) = ((ar2(1, i) + 1) * 10000 + ar3(1, i) + 1) * 100 * V - ar1(1, i)
Next i

TOP

Airman

中學生 Rank: 2

帖子: 315
主題: 51
精華: 0
積分: 367
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
註冊時間: 2015-9-29
最後登錄: 2021-10-12

15^#

發表於 2019-6-2 08:59 | 只看該作者

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

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

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-23

14^#

發表於 2019-6-1 19:59 | 只看該作者

再做個純vba+自訂函數:

(MF)-前3大&小雙層比對後之中式排名的語法_v3.rar (57.86 KB)

沒辦法一一比對正確性, 今非昔比, 眼力差太多了,
另一帖問題, 有時間再去看看~~

TOP

Airman

中學生 Rank: 2

帖子: 315
主題: 51
精華: 0
積分: 367
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
註冊時間: 2015-9-29
最後登錄: 2021-10-12

13^#

發表於 2019-6-1 18:34 | 只看該作者

本帖最後由 Airman 於 2019-6-1 18:36 編輯

回復 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]

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

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-23

12^#

發表於 2019-6-1 14:53 | 只看該作者

雙層的公式有誤,少加一個條件, 修正:

(MF)-前3大&小雙層比對後之中式排名的語法_v2.rar (69.27 KB)

太多數據, 沒法一一比對~~

TOP

Airman

中學生 Rank: 2

帖子: 315
主題: 51
精華: 0
積分: 367
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
註冊時間: 2015-9-29
最後登錄: 2021-10-12

11^#

發表於 2019-5-31 18:49 | 只看該作者

本帖最後由 Airman 於 2019-5-31 19:01 編輯

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

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

萬分感激您多日來耐心的指導和賜教