Okay, so I made a new normal Module

Public Sub setarrays()

Public jobindex As Integer
Public Max As Integer
Max = 15
Public jobdisplay(1 To Max) As String

End Sub
I'm still getting the same error. Sorry, I"m fairly new to this stuff.