横列のデータを縦列に並び替える方法
- 横列のデータを縦列に並び替える方法について教えてください。エクセルまたはエクセルVBAでの回答をお願いします。
- ランダムなデータが横に並んでいる場合、それを縦に並べ替える方法を教えてください。エクセル2007を使用しております。
- ランダムなデータを縦列に並び替える方法や昇順で並び替える方法を教えてください。エクセルまたはエクセルVBAでの回答をお願いします。
- ベストアンサー
横列のデータを縦列に並び替える方法。
どなたかご存じでしたらご回答願います。 エクセル２００７を使用しておりますが、 下記のように３つでひとかたまりのランダムなデータが横に３０個あります。 （かたまりとかたまりの間には半角のスペースが１つあります。） 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 ： 回答としては、エクセル又はエクセルＶＢＡでお願いします。 以上、よろしくお願いします。
- moguo4649
- お礼率75% (224/296)
- オフィス系ソフト
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
横向きの元のデータを貼り付け メニューの「データ」から「区切り位置」で「スペースによって...」を選択して、完了 横に張り付いたセルを選択して、CNTL+Cでコピー 未入力の縦のセルを選択して、右クリック、「形式を選択して貼り付け」で「行列を入れ替える」にチェックを入れてOK 並び替え位は自分で探してください。
その他の回答 (1)
- KURUMITO
- ベストアンサー率42% (1835/4283)
ご質問の意味は一つのセルにお示しのようなデータが入力されているということでしょうか？それなら回答１のようにすればよいでしょう。 そうではなくて一つのセルに３つで一塊のデータがあるということでしょうか？ そうであるならシート１の１行目に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列にはお望みのデータが並びます。
お礼
ご回答ありがとうございます。 質問下手で申し訳ありません。 質問内容は、「１つのセルの中に３つかたまった数字があり、そいうったセルが横に並んでいる場合に 縦に並べる方法」です。 ご回答にあるような、１つのセルの中に３つかたまった数字が連続である場合に３つかたまりで 縦に並べる方法を教えて頂きありがとうございます。 今後使用する機会があれば使用させて頂きます。 ありがとうございます。
関連するQ&A
- エクセル内で縦列を横列に並べ替える方法を教えて下さい
縦に並んだ列を横に並べ直したいのですが、一定の行ごとに それらを繰り返したいのですが、可能でしょうか？ 具体的に言うと、縦に並んだ列を ひたすら横に並べ直すだけで あれば、「形式を選択して貼り付け」 ⇒ 「行列を入れ替える」で 可能だと思うのですが、そうではなく、例えば一定の5行まで来たら、 次の行で再度 横一列に並び替える繰り返しって できますか？ (説明が下手で すみません；；) 図で説明したほうが伝わりやすいかも知れないので、 説明画像を添付いたしましたので、拝見していただると幸いです。 後、補足ですが、関数を設定して試したことがあるのですが、 そうすると 全てのセル内の文字が、見た目は元から 入力していた通りの文字に見えるのですが、いざ各セル内の 文字をクリックすると、数式バー内にて関数の文字で表記されたり、 文字をコピーしてみても、文字としてコピーできず、設定した 関数文字がコピーされてしまったり、不要な文字を手動で 削除したりすると、表が崩れてしまい関数設定も 無効になってしまいました。。そして次にエクセルを 開きなおすと エラーになり、全ての文字が見れなくなります。 関数設定してもセル内の文字がそのままの文字として表記され、 そのままの文字としてコピーでき、不要な文字を削除(手動で)しても 崩れたりエラーにならない方法ってありますか？ 当方、詳しくはないので、具体的に教えていただけると 幸いに思います。 長くなりましたが、どなたかご存知の方が いらっしゃれば、 ご教授 よろしくお願い致しますm(_ _)m
- ベストアンサー
- オフィス系ソフト
- エクセル内で縦列を横列に並べ替える方法を教えて下さい
縦に並んだ列を横に並べ直したいのですが、一定の行ごとに それらを繰り返したいのですが、可能でしょうか？ 具体的に言うと、縦に並んだ列を ひたすら横に並べ直すだけで あれば、「形式を選択して貼り付け」 ⇒ 「行列を入れ替える」で 可能ですが、そうではなく、例えば一定の5行まで来たら、 次の行で再度 横一列に並び替える繰り返しって できますか？ (説明が下手で すみません；；) 図で説明したほうが伝わりやすいかも知れないので、 説明画像を添付いたしましたので、拝見していただると幸いです。 後、補足ですが、関数を設定して試したことがあるのですが、 そうすると 全てのセル内の文字が、見た目は元から 入力していた通りの文字に見えるのですが、いざ各セル内の 文字をクリックすると、数式バー内にて関数の文字で表記されたり、 文字をコピーしてみても、文字としてコピーできず、設定した 関数文字がコピーされてしまったり、不要な文字を手動で 削除したりすると、表が崩れてしまい関数設定も 無効になってしまいました。。そして次にエクセルを 開きなおすと エラーになり、全ての文字が見れなくなります。 関数設定してもセル内の文字がそのままの文字として表記され、 そのままの文字としてコピーでき、不要な文字を削除(手動で)しても 崩れたりエラーにならない方法ってありますか？ 当方、詳しくはないので、具体的に教えていただけると 幸いに思います。 長くなりましたが、どなたかご存知の方が いらっしゃれば、 ご教授 よろしくお願い致しますm(_ _)m
- ベストアンサー
- オフィス系ソフト
- 縦列 横列 をマクロで入れ替えろ行いたいのですが
エクセルで下記のような並び替えろ瞬時に行える方法はないでしょうか？できればマクロを組みたいのですが…マクロ初心者なのでいい方法を簡単に教えてください。 番号 日時(1） 日時(2) 日時(3) 日時(4) A N台 N台 N台 N台 B N台 N台 N台 N台 C N台 N台 N台 N台 このようなデータを A 日時(1） 台数 A 日時(2） 台数 A 日時(3） 台数 A 日時(4） 台数 B 日時(1） 台数 B 日時(2） 台数 B 日時(3） 台数 B 日時(4） 台数 縦列300～500データ 横列データの数は100～200データあり そのときによってさまざまです。 このように瞬時に並び替えろ行いたいです。 簡単にわかりやすく教えてください。 よろしくお願いいたします。
- 締切済み
- Visual Basic
- Excelで（）の中の数字で昇順に並べ替えたい
エクセルのデータで ◯◯ ◯◯ (25) △△△△△△ (3) □□□□ □□ □□ (124) のようなデータがあります。 そのデータから（ ）の中の数字で昇順（もしくは降順）に並べ替えたいのです。 （ ）の前には半角のスペースが入っています。 ◯◯ ◯◯や□□□□ □□ □□の部分は途中に半角スペースが複数入っていたり入って無かったりです。 関数を使って何とかなるものでしょうか？ 詳しくないのでわかりませんが、マクロを使用するのでしょうか？ マクロは使ったことがないので、できたら関数で並び替えができるといいのですが・・・
- ベストアンサー
- Excel（エクセル）
- エクセルで縦列を横行にするには？
エクセル２００７を使っています。 縦：Ａ１列に日付があり、Ｂ１列にデータがあります。 これをＣ１行にＡ１列の日付、Ｃ２行にＢ１列のデータというように 縦のものを横に変更したいのですが、それぞれを参照するようにする他に、 どのようにしたらいいのでしょうか？
- ベストアンサー
- オフィス系ソフト
- Excelの重複データーを削除したい
Excel 2010 の A列 に複数のデーターがあります。これをExcelの機能で昇順に並べ替えます。 重複したデーターが有れば削除し、ブランク行のない状態にするため VBA で処理していますが、この作業を簡単に行える良い方法が有れば教えてください。
- ベストアンサー
- その他MS Office製品
- ms エクセル 2003で複数データーの抽出
ms エクセル 2003で複数データーの抽出貼り付け (例)下のようにA1セル縦にランダムに数字が並んでいます。この縦に 並んでいる数字をB1～B6に任意の範囲に並べる式又は関数をおしえて A B ください。 1 6 16 26 36 1～8までを横に並べる(1 3 5 6 8 )―――例 2 8 18 28 38 12～16までを横に並べる( ) 3 2 12 22 32 42 11～23までを横に並べる( ) 4 3 13 23 33 43 20～31までを横に並べる( ) 5 5 15 25 35 33～39までを横に並べる( ) 6 1 11 21 21 41 36～43までを横に並べる( )
- 締切済み
- その他（ITシステム運用・管理）
- Excelでのデータ取得方法
質問させていただきます。 縦に並んでいるデータを横に並べ変えたいのですが、その方法がわかりません。 具体的に実現したことは・・・ Sheet2 1/1 1/2 1/3 ・ これを以下のように並べ替える・・・ Sheet1 1/1 1/2 1/3 ・・・ コマンドボタン（VBA)を押したときに色々処理を行っているのですが、その一部として実現させたいと考えています。 簡単なことかもしれませんが、ご指導のほどお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル2003のマクロでテキストファイルのデータを置換しようとしてい
エクセル2003のマクロでテキストファイルのデータを置換しようとしています。 下記のようなデータが***.txtファイルに入っています。 a)を半角スペース2つに置換したいのですがどうしたらできるのか、 2文字の置換方法をご存知の方教えていただけないでしょうか？ LinInputでデータを1行ずつ読み込み、 左の数値データも半角スペースに置換し、 Trimでスペースを削除しようと思います。 【入力データ】 10 55567 444 987 11 456b) 2345 789 a12 12 123a) 456 888 b17 ・ ・ ・ 【出力データ】 55567 444 987 456b) 2345 789 123 456 888 ・ ・ ・
- ベストアンサー
- オフィス系ソフト
お礼
ご回答ありがとうございます。 そのような操作なら簡単にできそうです。 早速やってみます。