помогите. Сколько существует четырёхзначных чисел, делящихся на 5, у которых все цифры разные и чётные?

3 цифры дают 900 вариантов
отбрасываем варианты хху ухх хух
это 3*99 = 297
900-297 = 603
и 4-я цифра 0 или5
итого 1206 вариантов
а excel говорит 648*2 = 1296
с помощью этой проги: :
Sub ppp()
ss = 0
For ii1 = 1 To 9
For ii2 = 0 To 9
For ii3 = 0 To 9
If ii1 <> ii2 And ii2 <> ii3 And ii1 <> ii3 Then
ss = ss + 1
End If
Next ii3
Next ii2
Next ii1
Cells(1, 1) = ss
End Sub

Excel-ю я верю больше чем себе )))