[[20211218114703]] 『1行目から最終行までをランダムで入れ替えたいでax(くーさん) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『1行目から最終行までをランダムで入れ替えたいです。』(くーさん)

初めまして質問させて下さい。

VBAで二次元配列を使い、300行×20列のデータをA1のシートに貼り付けております。

そのデータを行を軸としてランダムに入れ替えたいのです。
例といたしまして、
1行目を200行目
2行目を150行目
3行目を110行目


この様に行を軸として全てのデータを入れ替えたいのです。
全部のデータを残したいので、入れ替えた際に別データを上書きするのはNGです。
元のデータの順番を入れ替えるというのが目的でございます。

VBAでもエクセルに搭載されてる関数でもどちらでも構いませんので、教えて頂けますと助かります。
宜しくお願いします。

< 使用 Excel:Excel2019、使用 OS:Windows10 >


 最終列の右隣りのセルに下記の式を設定。

 =RAND()

 この列で並べ替えればランダムに並べ替えられます。

 元の並び順に戻せるようにしておきたい場合は、昇順の値を右隣の列に先に入力しておいてから、
 =RAND()で並べ替えしてください。
(hatena) 2021/12/18(土) 12:19

ありがとうございます!!!
(くーさん) 2021/12/18(土) 13:07

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.