call subroutine via variable with arguments

[RAYLWARD102]

I have some routines that I call with a variable in example1. The need has come to pass an array to the variable called subroutine; any ideas?

Sub CommandExamples()
    Dim SomeArray As Variant
    ReDim SomeArray(0 To 0)
    
    'Example1: Example1 works; don't need any help with example 1
        Application.Run "Example1"
        
        
    'Example2: Example2 doesn't work; wondering how to run a routine that requires object sources (variant, long)
        Application.Run "Example2(" & SomeArray & ")"
End Sub
Sub Example1()
    Debug.Print "works"
End Sub
Sub Example2(ArraySource As Variant)
    Debug.Print "does not work"
End Sub

 

[JLGWhiz]

I would think

 Application.Run "Example2" SomeArray

And then in the called macro title

Sub Example2(ByRef SomeArray As Variant)
For i = LBound(SomeArray To UBound(SomeArray)
 MsgBox SomeArray(i)
Next
End Sub

 

[RAYLWARD102]

tried it with a comma; works now

Application.Run "Example2", SomeArray

 

[JLGWhiz]

tried it with a comma; works now

Application.Run "Example2", SomeArray

Sorry bout that. Thanks for the feed back.
Regards, JLG