合計値がある範囲の場合に印をつけるには？
どなたかご存じでしたらご回答をお願いします。
【質問】
下記のＶＢＡを実行すると、「異なる 25個のものから 5個を選ぶ組み合わせ
の総数 nCr （53,130通り）」を作成します。Ａ列～Ｅ列の合計をＦ列に表示しておりますが、
Ｆ列の値が58～102の場合、Ｇ列に”●”をつけるには、
下記ＶＢＡのソースはどのように修正すればよいでしょうか？
●ＶＢＡソース
ub test()
Const MaxNum = 25
Dim s(25) As String
Dim i As Integer
Dim r As Integer
Dim c As Integer
i = 1
For r = 1 To 5
For c = 1 To 5
s(i) = Cells(r, c).Value
i = i + 1
Next
Next
Dim j, k, l, m
Dim rowX As Long
rowX = 0
rowX = rowX + 1
For i = 1 To MaxNum - 4
For j = i + 1 To MaxNum - 3
For k = j + 1 To MaxNum - 2
For l = k + 1 To MaxNum - 1
For m = l + 1 To MaxNum
Cells(rowX, 1).Value = s(i)
Cells(rowX, 2).Value = s(j)
Cells(rowX, 3).Value = s(k)
Cells(rowX, 4).Value = s(l)
Cells(rowX, 5).Value = s(m)
Cells(rowX, 6).Value = Application.WorksheetFunction.Sum(s(i), s(j), s(k), s(l), s(m))
rowX = rowX + 1
Next m
Next l
Next k
Next j
Next i
End Sub
●ＶＢＡ実行結果（やりたいこと）
Ａ Ｂ Ｃ Ｄ Ｅ Ｆ Ｇ
1 2 3 4 5 15
1 2 3 4 6 16
1 2 3 4 7 17
1 2 3 4 8 18
1 2 3 4 9 19
：
：
1 5 12 19 20 57
1 5 12 19 21 58 ●
1 5 12 19 22 59 ●
1 5 12 19 23 60 ●
：
：
20 21 22 24 25 112
20 21 23 24 25 113
20 22 23 24 25 114
21 22 23 24 25 115
【注意事項】
・使用するエクセルは２０１０です。
以上、よろしくお願いします。
お礼
アドバイスありがとうございます。 そうですねー通販で買おうかと思ったのですが ショップに行って実物見て訊いてからの方が 間違い無いですね！ そうする事にします。 ありがとうございました。