Random number generator in VBA using Analysis Toolpack-VBA

I use the following line to generate Poisson random numbers:

Application.Run("Random", "", 1, 100, 5, , 34) 

this produces 100 random numbers with Lambda (34) in an excel sheet. I would like to save the output into a variable instead of sheet. I tried

X=Application.Run("Random", "", 1, NSim, 5, , 34)

I don't get any error but nothing is saved in "X". Could you please help me how I can save the result in a variable. Thanks