Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8676 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【31893】セルをランダムに並べ替える方法 はるな 05/12/1(木) 22:24 質問[未読]
【31894】Re:セルをランダムに並べ替える方法 ganko 05/12/1(木) 22:41 発言[未読]
【31895】Re:セルをランダムに並べ替える方法 はるな 05/12/1(木) 22:48 発言[未読]
【31897】Re:セルをランダムに並べ替える方法 ganko 05/12/1(木) 23:16 回答[未読]
【31898】Re:セルをランダムに並べ替える方法 はるな 05/12/1(木) 23:35 お礼[未読]
【31893】セルをランダムに並べ替える方法
質問  はるな  - 05/12/1(木) 22:24 -
引用なし
パスワード
   こんにちは。お世話になります。
F10〜D140のセルに文字が入っております。
この範囲のセルを完全にランダムな順序で並べ替えたいのですが、
どうしたら良いでしょうか？なお、F10にしか文字が入っていなければ、
並べ替えは行いません。
【31894】Re:セルをランダムに並べ替える方法
発言  ganko  - 05/12/1(木) 22:41 -
引用なし
パスワード
   ▼はるな さん：

今晩は。
データがどのような状態なのか分かりませんが…
１列でしたら、小生は「＝RAND」関数で乱数を発生させて
昇順または降順に並べ替えています。

>こんにちは。お世話になります。
>F10〜D140のセルに文字が入っております。
>この範囲のセルを完全にランダムな順序で並べ替えたいのですが、
>どうしたら良いでしょうか？なお、F10にしか文字が入っていなければ、
>並べ替えは行いません。
【31895】Re:セルをランダムに並べ替える方法
発言  はるな  - 05/12/1(木) 22:48 -
引用なし
パスワード
   ▼ganko さん：アドバイス有難う御座います。
VBAを3日前に始めた初心者です。RAND関数はランダムに数値を発生させる関数程度
しか理解できていません。もし良かったら、コードを提示していただけないでしょうか？
【31897】Re:セルをランダムに並べ替える方法
回答  ganko  - 05/12/1(木) 23:16 -
引用なし
パスワード
   ▼はるな さん：

例えば次のような表でテストしてください
VBAを始められたばかりですと、先ず普通のシート関数でされては
如何でしょう。そのほうが分かりやすいでしょう。
　A　　　B
氏名　(乱数処理）
山田　=RAND()
田中　=RAND()
西村　=RAND()
多田　=RAND()
太田　=RAND()

B列にRAND関数を上のように入れます。
エクセルを開くと、この関数のところが
0.…と現れます。閉じては開けばこの数字が
乱数になって発生されるのです。0.9以下の数字が並ぶ筈です。

そこで、そのB列を基準に昇順でも降順でも良いので
並べ替えると、全く異なった氏名の順に並び変わります。
乱数が目移りするようでしたら、文字を白に指定されると良いでしょう。
こんな程度でよいでしょうか。


>▼ganko さん：アドバイス有難う御座います。
>VBAを3日前に始めた初心者です。RAND関数はランダムに数値を発生させる関数程度
>しか理解できていません。もし良かったら、コードを提示していただけないでしょうか？
【31898】Re:セルをランダムに並べ替える方法
お礼  はるな  - 05/12/1(木) 23:35 -
引用なし
パスワード
   ▼ganko さん：
アドバイスいただき有難う御座いました。
教えていただいた方法で乱数を発生させることができました。
解決しました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8676 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free