Помогите дописать программу для VBA!!!

[funky_dude]

Нужно определить корректность матрицы.
Если числа в матрице целые и входят в дмапазон от 0 до 100, то матрица корректна, в противном случае- некорректна.
Вот то, что я написал:

Sub CorrectMatrix()
Dim i, j, rownum, colnum As Variant
Dim bool As Boolean
i = 1
j = 1
rownum = 0
colnum = 0
Do While Cells(i, j).Value <> Empty
i = i + 1
j = j + 1
rownum = rownum + 1
colnum = colnum + 1
Loop
i = i - 1
j = j - 1
rownum = i
colnum = j
For i = 1 To rownum
For j = 1 To colnum
If (Cells(i, j).Value < 0) Or (Cells(i, j).Value) > 100 Or ((Cells(i, j).Value) \ 1) <> Cells(i, j).Value Then
bool = False
Else
bool = True
End If
Next j
Next i
If bool = False Then
MsgBox "Введённая матрица некорректна, т.к. содержимое одной или нескольких ячеек не входит в диапазон 0-100 или не является целым", vbCritical
Else
MsgBox "Введённая матрица корректна", vbOKOnly
End If
End Sub

Всё ок.
Но препод добавил условие, что если в ячейке строка(слово, буква и тп), матрица тоже будет некорректной.
Как это сделать?
всм проверку на то, строка там или число?

[funky_dude]

бамп......