Thread: Create a random array contain a fixed number
View Single Post
  #2  
Old 07-09-2009, 11:22 PM
rylo rylo is offline
Forum Moderator
  
Join Date: 15 Jan 2007
Location: Brisbane, Australia
MS Office Version:2003
Posts: 4,096
rylo is very confident of their ability rylo is very confident of their ability rylo is very confident of their ability rylo is very confident of their ability
Re: Create a random array contain a fixed number
Hi

Maybe this will get you going.

Code:
Sub aaa()
  Dim arr(3)
  arr(0) = 2
  For i = 1 To 3
    arr(i) = Int(Rnd() * 100)
  Next i
  
  For i = 0 To 3
    Range("E1").Offset(i, 0).Value = arr(i)
  Next i
    
End Sub
rylo
Reply With Quote