[VBA ] [問題] 寫在EXCEL的一個比對程式
小弟是剛接觸VB的新手 有一點C的基礎
這個程式的目的是當使用者輸入一組樂透號碼(6/49)
程式會比對表格中的另一組號碼(表格已建立)
一次只比對一組即輸出
---以下為程式---
Function Lott(a, b, c, d, e, f, u, v, w, x, y, z)
count = 0
Dim n(12)
n1 = a
n2 = b
n3 = c
n4 = d
n5 = e
n6 = f
n7 = u
n8 = v
n9 = w
n10 = x
n11 = y
n12 = z
For i = 1 To 6
For j = 7 To 12
If n(i) = n(j) Then
count = count + 1
End If
Next j
Next i
Lott(a, b, c, d, e, f, u, v, w, x, y, z) = count
End Function
---
輸入端前六碼為表格中的號碼,後六碼為一組固定數字
皆由表格中輸入,例: {=Lott(D3:I3,D4:I4)}
不過都是#VALUE! (Q__Q
請問我的程式有什麼錯誤嗎?
再請問 在輸入端的12個變數可以直接宣告成Lott(n1,...,n12)嗎?
麻煩幫在下看一下,謝謝<(_ _)>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.119.163.183
推
11/26 14:32, , 1F
11/26 14:32, 1F
→
11/26 15:00, , 2F
11/26 15:00, 2F
推
11/26 23:03, , 3F
11/26 23:03, 3F
→
11/26 23:05, , 4F
11/26 23:05, 4F
→
11/26 23:06, , 5F
11/26 23:06, 5F