横列のデータを縦列に並び替える方法。

質問

どなたかご存じでしたらご回答願います。
エクセル２００７を使用しておりますが、
下記のように３つでひとかたまりのランダムなデータが横に３０個あります。
（かたまりとかたまりの間には半角のスペースが１つあります。）

103 015 071 190 803 650 069 098 516 581 716 961 178 198 568 687 869　…

これを、縦に並べる方法を教えてください。
103　　　
015
071
803
：

追加として、縦に”昇順”で並べる方法も合わせて教えてください。
015
069
071
098
：

回答としては、エクセル又はエクセルＶＢＡでお願いします。
以上、よろしくお願いします。

回答No.1

SaKaKashi · ベストアンサー

横向きの元のデータを貼り付け
メニューの「データ」から「区切り位置」で「スペースによって...」を選択して、完了
横に張り付いたセルを選択して、CNTL+Cでコピー
未入力の縦のセルを選択して、右クリック、「形式を選択して貼り付け」で「行列を入れ替える」にチェックを入れてOK
並び替え位は自分で探してください。

お礼

ご回答ありがとうございます。
そのような操作なら簡単にできそうです。
早速やってみます。

回答No.2

KURUMITO

ご質問の意味は一つのセルにお示しのようなデータが入力されているということでしょうか？それなら回答１のようにすればよいでしょう。
そうではなくて一つのセルに３つで一塊のデータがあるということでしょうか？
そうであるならシート１の１行目にA１セルから右横にデータがあるとしたらシート２では次の式をA１セルに入力して下方にオートフィルドラッグします。

=IF(MOD(ROW(A1),3)=1,LEFT(INDEX(Sheet1!$1:$1,ROUNDUP(ROW(A1)/3,0)),3),IF(MOD(ROW(A1),3)=2,MID(INDEX(Sheet1!$1:$1,ROUNDUP(ROW(A1)/3,0)),5,3),IF(MOD(ROW(A1),3)=0,MID(INDEX(Sheet1!$1:$1,ROUNDUP(ROW(A1)/3,0)),9,3),"")))

これで縦に数値が並びますね。その後に昇順でデータを並べるにはA列を選択してコピーし、その後に例えばシート２のB１セルを選択してから「形式を選択して貼り付け」で「値」を選択して貼り付けます。
その後にB列を選択して昇順で並べ替えをすればB列にはお望みのデータが並びます。

お礼

ご回答ありがとうございます。
質問下手で申し訳ありません。
質問内容は、「１つのセルの中に３つかたまった数字があり、そいうったセルが横に並んでいる場合に
縦に並べる方法」です。
ご回答にあるような、１つのセルの中に３つかたまった数字が連続である場合に３つかたまりで
縦に並べる方法を教えて頂きありがとうございます。
今後使用する機会があれば使用させて頂きます。
ありがとうございます。