Sub arrayTest5() Dim intScores1 As Integer Dim intScores2(4) As Integer Debug.Print "Is intScores1 an array: " & IsArray(intScores1) Debug.Print "Is intScores2 an array: " & IsArray(intScores2) End Sub