Проверка данных в многостраничном режиме перед переключением страниц

Question

Я новичок в самообучающемся Excel, в пользовательской форме есть 5 страниц с примерно 10 текстовыми полями на каждой странице.

Я работаю над тем, чтобы изменить вкладку страниц, например, со страницы (0) на страницу (1), программа проверит, допустимо ли значение текстового поля в странице (0), если положительное целое число, 0 и ноль. Однако значение проверяется не только при повторном выборе страницы (0). Мой код выглядит следующим образом:

Private Sub MultiPage_Change()

Dim ctl As MSForms.Control

For Each ctl In MultiPage.SelectedItem.Controls
    If TypeOf ctl Is MSForms.TextBox Then
        If ctl.Value <> "" Then
            If IsNumeric(ctl) And ctl >= 0 Then
                If ctl <> Int(ctl) Then
                    MsgBox ctl.Name & "not integer", vbOKOnly
                End If
            Else: MsgBox ctl.Name & "not number", vbOKOnly
            End If
        End If
    End If
Next ctl

End Sub

Посоветуйте, пожалуйста, как убедиться, что все учебники соответствуют требованиям, прежде чем переходить на другие страницы, Спасибо.