>>951
Variant型は便利だけどVBAでは取り扱いが初心者には難しい方だと思う
昨日も変数の型のことで荒れてたけど、できるだけ適切な型を指定した方がバグになりにくい

そのまま動くようにするなら
Sub test()
　　Dim arrs() As Variant
　　ReDim arrs(200)
　　Dim i As Long
　　For i = 0 To 200
　　　　arrs(i) = i
　　Next i
End Sub

俺が推奨したい書き方は
Const arr_max = 200
Sub test()
　　Dim arrs(arr_max) As Long
　　Dim i As Long
　　For i = 0 To arr_max
　　　　arrs(i) = i
　　Next i
End Sub