You need to ReDim your array (not too sure on this myself, but I'll give it a try...)
First, when you declare your array you musn't put in any bounds:
Dim strRecTo()
Then if you ever want to redimension your array you use the redim statement:
Redim strRecTo(n,1)
Note: I thought I read...