Array + Input Parameter

Hi everyone,

I have implemented a subroutine. Here is the signature :

Code:

---

Public Sub MySubroutine(ByRef arrMyArray() As Integer, ByRef lngMyLong As Long)

---

I want to call my subroutine without passing in any variables.
I passed in 0 as lngMyLong but I have had to create an array to pass in the subroutine as arrMyArray.

Is there a way to call my subroutine without passing in an array variable ?

Thanks in advance for your future help

Rather than passing fake values, just specify that they should be optional:

Code:

---

Public Sub MySubroutine(Optional ByRef arrMyArray() As Integer, Optional ByRef lngMyLong As Long)

---

If you want to, you can even set a value that will be used if nothing is passed:

Code:

---

Public Sub MySubroutine(Optional ByRef arrMyArray() As Integer, Optional ByRef lngMyLong As Long = -1)

---

Arrays can't be optional parameters, but variants can be. Otherwise, agree with suggestion

Code:

---

Public Sub MySubroutine(Optional ByRef arrMyArray As Variant, Optional ByRef lngMyLong As Long)
    If IsMissing(arrMyArray) = False Then
        If VarType(arrMyArray) = (vbArray Or vbInteger) Then
            ' process your array
        End If
    End If
End Sub

---