Is Array Empty | Boolean Answer

[verizon]

Hello

I have a subroutine that may or may not be presented with an array. If an
array has not been presented, then it should take the array from the current
worksheet:

Sub CreateTAPPIndex(Optional TAPPMatrix As Variant)
If IsEmpty(TAPPMatrix) Then
Rem This section understands when the matrix is a raw sheet versus a
presented array
Range("2:2").EntireRow.Delete
TAPPMatrix = Range("a1").CurrentRegion.Value
End If
End Sub

But if TAPPMatrix is undefined, it does NOT trigger a TRUE response from
IsEmpty. What am I doing wrong? Is there a better way?

Thank you

W

 

[Vasant Nanavati]

Try IsMissing instead of IsEmpty. I think it will work.

 

[Guest]

Another way:

Sub CreateTAPPIndex(Optional TAPPMatrix As Variant)
Dim N As Long, ArrIsNull As Boolean
On Error Resume Next
N = TAPPMatrix.Count
On Error GoTo 0
ArrIsNull = N = 0
End Sub

PB