Some commands don't work well 'Evaluated.'
Here's a small section of your code...

Sub Demo()
Dim v
'Bad
v = [Row(Indirect("1:3"))]
v = Evaluate("Row(Indirect(""1:3""))")

'Good
v = [Row(1:3)]
End Sub

Could you explain what the formula does? It appears to return the either
the same number, or an error.
--
HTH :)
Dana DeLouis

<snip