title: VBA Arrays in Word
body: <p>I want to declare a dynamic string array, then make calls to each of the other procedures. This is what I have, I thought it would work but I keep getting errors.</p>
  
  <pre><code>Option Explicit
  
  Sub Main()
  
     Public ListArr() As String
  
     Application.Run "Get_Input_List"
  
  End Sub
  
  Function Get_Input_List(ByRef ListArr() As String) As String
  
     Dim list As String
     Dim MesBox As String
  
    list = InputBox("Please enters word to sort using a comma with no space to separate", "Words")
  
    ListArr = Split(list, ",")
  
    MsgBox ListArr(1)
  
  End Function
  </code></pre>