『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