[VB6 ]excel中函數的寫法

看板Visual_Basic作者 (不靠近不遙遠)時間18年前 (2006/04/21 22:16), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
在excel中,並沒有類似Or、And、Nor,這種邏輯運算式的函數, 小弟就利用函數的方式來進行自訂代表該邏輯運算的函數, 資料如下: Function ORR(Num1, Num2) ORR = Num1 Or Num2 End Function 結果: 假設excel資料 A B C D E 1 566 245 24568 234 在巨集中開VB6插入模組,把上述函數輸入 之後,欲檢定A1/C1 或 B1/D1 其中一個小於0.05時,在E1顯示為1,否則0 E1公式=IF(ORR(A1/C1<0.05,B1/D1<0.05),1,0) 目前為止,這樣的函數是沒有問題的! 如果今天欲檢定的不是兩組,而更多時,上面寫的函數就失靈了, 比如: A B C D E F G H 1 566 245 24568 234 3 324 2348 2346 若欲檢定這四組A1/E1、B1/F1、C1/G1、D1/H1其中是否有小於0.05時 上述的函數只能輸入兩個變數 必須修正成 Function ORR(Num1, Num2, Num3, Num4) ORR = Num1 Or Num2 Or Num3 Or Num4 End Function 問題在於,如果我的組數是有可能變動的話,換成上一行的函數時, 而只輸入Num1, Num2,就會出現錯誤… 我沒有有可能定義一個函數,像是excel中預設的的Sum(Num1, Num2, )-->最多30組 就是我希望建立一個通用的函數 在當我只輸入Num1, Num2, Num3 或 輸入Num1, Num2, Num3, Num4 甚或更多時, 函數都可以通用 如果成功的話,以後就能在Excel裡面自訂邏輯運算的函數了!(常常需要用到) 謝謝各位高手的幫忙,這個問題對小弟真的很重要。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.133.92.158
文章代碼(AID): #14IEbOJc (Visual_Basic)
文章代碼(AID): #14IEbOJc (Visual_Basic)