|    | 
     ▼hatena さん: 
>>変数を5つ用意して 
>>int a, int b, int c, int d, int e 
>> 
>>a〜eまでに1〜5までの値をランダムに入れます。 
>>ただし、a〜eで数字がダブル事がしないようにしたいです。 
> 
>下記で紹介しているAryShuffle関数を使えばどうでしょうか。 
> 
>配列をランダムに並べ替える関数 - hatena chips 
>hatenachips.blog34.fc2.com/blog-entry-121.html 
> 
> 
>使用例 
>Sub Test() 
>  Dim v As Variant 
>  Dim a As Integer, b As Integer, c As Integer 
>  Dim d As Integer, e As Integer 
>   
>  v = Array(1, 2, 3, 4, 5) 
>  AryShuffle v 
>   
>  a = v(0) 
>  b = v(1) 
>  c = v(2) 
>  d = v(3) 
>  e = v(4) 
>   
>  Debug.Print a; b; c; d; e 
>End Sub 
 
出来ました。 
ありがとうございます。 
 
もし、教えていただけるのであれば、 
参考までに次の事もご教授して頂けるとうれしいです。 
 
もし、100個のデータがあった場合に、 
変数を配列化したりArray(1, 2, 3, 4, 5)を 
簡略化できる方法はありますか? 
 | 
     
    
   |