Option Explicit

Sub test()

    Dim arr1() As Variant
    Dim arr2 As Variant
    arr2 = Array()

    testarr1 arr1
    testarr2 arr1

    testarr1 arr2
    testarr2 arr2

End Sub

Sub testarr1(ByRef arr1() As Variant)

End Sub

Sub testarr2(ByRef arr2 As Variant)

End Sub