Is Array Empty | Boolean Answer
 

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

Is Array Empty | Boolean Answer
 

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

--

Vasant

"verizon" wrote in message
...
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

Is Array Empty | Boolean Answer
 

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


-----Original Message-----
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


.