如何确定变量是否是VBA中的整数？

Sub CheckIfInteger()
    Dim variable As Variant
    variable = 10
    
    If IsNumeric(variable) And TypeName(variable) = "Integer" Then
        MsgBox "The variable is an integer."
    Else
        MsgBox "The variable is not an integer."
    End If
End Sub