Declare a Constant Array

[sixth sense]

How about a public function that returns the array. Function works just like any variables.

Try this.

Public Function Arr()
Arr = Array("a", "b", "c")
End Function

Sub try()
For Each a In Arr
MsgBox a
Next a
End Sub