I don’t know if the following is exactly kosher, but it seems not to error out in multiple use:
Option Explicit
If Not IsArray(stuff) Then Private stuff()
Private add
If IsEmpty(add) Then add = 0
Call Test()
Sub Test()
ReDim stuff(0)
stuff(0) = "stuff" & Cstr(add)
Call Rhino.Print(stuff(0))
add = add + 1
End Sub
Run it several times…
–Mitch