[算表] Excel程式問題

看板Office作者yzhsage (Marx, Karl)時間18年前 (2007/12/13 22:37)推噓1(1推 0噓 2→)

留言3則, 2人參與討論串1/2 (看更多)

軟體:Excel 版本:2007 and 2003 前幾天突然接到一個題目，上面要我們用Excel去做，開始寫判讀程式之後，發現我Excel的問題很大。希望有人可以幫忙。我現在有3筆資料放在兩個不同的sheet，假設這三筆資料是I、T、R I='sheet1'!C2:C10983 T='sheet1'!D2:D10983 R='sheet2'!B2:B2707 現在要判斷這三筆資料的關係。因為不大好描述，我用我破破的程式呈現一下： In(I), Tn(T), Rm(R), Cn(計算Rm在符合條件時的數量), S(計算所有R符合另一條件的數量) n=0, m=0 1 REPEAT n + 1 2 REPEAT m + 1 IF Rm - In > 0 IF Rm - Tn < 0, Cn+1, print "Rm in An" ELSEIF Rm - In = 1, print "Rm behind An" ELSE RETURN 2 END IF ELSEIF Rm - In < 0,S+1, print "Rm in B(n-1)" ELSE print "ERROR" END REPEAT print Cn END REPEAT (因為不是資訊方面科系，我的程式真的很糟，希望大家看得懂) 簡略說明一下: 就是每一筆R值都要跟I值和T值做比較， R-I>0時判斷R-T是否小於零，若小於零則在該隔寫上Rm in An，並記錄An裡有幾個R； R-T=1時則寫上Rm behind An；都不是就回到迴圈2。 R-I<0時則寫上Rm in Bn； R-I=0時就是定義錯誤接下來跳到下一列寫上Cn值。 (因為這個我不會寫就沒放進去) 之後再跳到下一列做另一個R值的運算。而在n+1時會跳到下一欄做運算。不知道Excel能否完成這樣的事情，若不能那應該要怎麼寫VB呢？因為事情很急，買書來翻似乎有點太慢，希望有高手可以幫忙。感恩。 http://www.badongo.com/file/5575871 這是上面的範例，希望能幫助大家了解。在Sheet3有一些說明，再感謝。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 122.122.83.105