• 締切済み

VBAで横のデータを縦に蓄積させる方法

エクセルVBAで横軸(元データ)に 0 1 2 3 4 5  と入力されているデータを縦軸に(別の蓄積用シート) 0 1 2 3 4 5 と変換し、なおかつ元データを変え、 2 3 4 5 6 7 を蓄積シートに 0 2 1 3 2 4  3 5 4 6 5 7 のように次々に蓄積させていく方法があれば教えてください。お願いします。

みんなの回答

  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.2

>Range("A65536).End(xlup).offset(1)  この使い方が本当に理解出来ているなら何も問題は無いはずですが、そうでもないようですね。 End()の移動方向オプションと、Offset()の使い方で自由に位置決めが可能です。 Range("IV1").End(xlToLeft).Offset(0, 1).Select

soba2222
質問者

お礼

ありがとうございました。できました。

  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.1

縦横を変えるなら、行列を入替えて貼付けしれば良いのでは? >なおかつ元データを変え、 どのように変化するのでしょうか? 単純にある値を加算するだけですか?

soba2222
質問者

補足

早速の回答ありがとうございます。たとえばデータ(転記元) セルA1 B1 C1 D1    1  2 3 4 という数値が入力されているものを 転記先のテーブルに 縦方向に蓄積させていく方法 Range("A65536).End(xlup).offset(1) の方法はわかるのですが、それが セルA1 1 … A2 2 … A3 3 … A4 4 … のように横方向に蓄積させていく方法を知りたいです。 説明不足で済みません。

関連するQ&A

  • エクセルでデータを蓄積させるには?

    エクセルで、入力用雛形シートと、蓄積用リストシートを作ります。入力雛形にデータを入力すると、リスト画面に蓄積されるにはどうすればいいでしょうか?保存ボタンを押すと入力したデータがリストに順々に保存されていくという形にしたいのですが・・・入力雛形はリスト画面に蓄積された(保存ボタンを押した)後、クリアさせるようにもしたいです。マクロは初心者です。教えて下さい。

  • エクセルでデータを蓄積するVBA

    蔵書管理用の一覧表です。 エクセルでデータ入力用のフォームは作ることができたのですがシートに転記するVBAをどのように書けばよいのか分かりません。 データは次々に増えていきます。 A列には番号を入力せずに自動的に番号が増えていくようにしたい。 3番まで入力済みのあとは、自動で「4」と番号が付与されて、下の行に転記されるようにしたい。 VBA初心者です。よろしくお願いします。 A    B      C          D 番号 分類     図書名      冊数 1   文庫本    日本の歴史   3 2   週刊誌    新潮        1 3   月刊誌    月刊ゴルフ    1

  • エクセル、リアルタイムデーターの蓄積方法

    こんにいちは。一応プログラム言語の経験者(Fortran90, R)ですが、マクロ、VBAに関してはほぼ初心者です。エクセル上に、リアルタイムで送られてくるデーターの蓄積方法を知りたいと思っています。この場所で、その方法をすべて教えてくださいというのは無理だと思うのですが、もしご存知の方が折られましたら、蓄積が可能か、またその方法を勉強できるようなサイト、書籍などをご存知でしたら教えてください。ご迷惑をおかけしますが、よろしくお願いします。

  • VBAを使ってグラフでのデータ管理がしたい

    たった今、本を読み始めたVBA初心者です。 VBAを使うと、『シート3』に『シート1,2』で出た計算値だけを (一日おきに)グラフに表したいのですが、出来ますか? よくわからないので、教えてください。 アドバイスを頂けたら嬉しいです。 一応、今はこんな感じになっています 『シート1』Excelで検査値を一覧にして入力しています。       入力すると計算値が出るようにしました。 『シート2』同じく検査値を一覧にして入力しています。       (1とは別の試料を用いています)       入力すると計算値が出るようにしました。 シート1,2とも計算値を出すためにExcelで作ったもので、 一日おきに上書きしてデータは消してしまいます。

  • EXCEL 2007 VBAによる時系列データの更新について

    EXCEL 2007 VBAによる時系列データの更新について 当方初心者です。意外と簡単に解決できるものかは分かりませんが質問させて頂きます。 どなたかご教授頂ければと思います。 "A.xls"の"Sheet1"に 2010/10/4 6:00   100   101   100   101 2010/10/5 6:00   102   103   101   102 2010/10/6 6:00   103   104   100   103 2010/10/7 6:00   103   105   100   102 2010/10/8 6:00   103   105   100   102 2010/10/11 6:00   102   107   100   102 2010/10/12 6:00   102   106   100   103 というように毎日蓄積されたデータを1行ごとに保存してあります。 そして"B.xls"の"Sheet1"には 2010/10/8 6:00   103   105   100   102 2010/10/11 6:00   102   107   100   102 2010/10/12 6:00   102   106   100   103 2010/10/13 6:00   101   104   100   102 2010/10/14 6:00   100   102   100   100 2010/10/15 6:00   101   103   100   100 のように最新のデータが保存されてあり、このデータを蓄積してある データ("A.xls"の"Sheet1")にVBAによってコピーしたいのです。 ただしこの場合、既に保存してある期間のデータよりも以降 (上記例では両データ共にA列に日付データが入力されてあり、 2010/10/13 6:00以降)のデータを"A.xls"の"Sheet1"の 2010/10/12 6:00   102   106   100   103 の次の行からコピーしていきたいのですが、どのような方法で 可能なのでしょうか? まだ初心者ですがどなたか教えていただければと存じます。 宜しくお願い申し上げます。

  • VBAを使ってセルを検索後別シートのデータを自動入力したいです。

    見ていただきありがとうございます。 エクセルの2000VBAを使って次のようなことを考えています。 シート2に以下のようなデータがあります。 2006/7/20 コード 数量  100  200   200  400 データの数は日によって違います。 シート1には以下の表があります。横軸にはコード縦軸には日付が入っており各対応するセルに数量が入っています。       100  200  300  400 ....←コード 2006/7/1  20  40  100  800 2006/7/2  50  60  200  500   .   .   . 2007/6/30  このような場合、シート2にコマンドボタンを設けて押したときシート2の日付とコード番号によりシート1の表の検索を行って対応するセルにシート2のデータを転記したいのです。シート2のデータは本日分のデータが入った時点でシート1への転記を行います。(1日一回です) また、シート1の表は2007/6/30(これ以降は必要ないので)までの日付がすでに入力されており明日以降のデータの入るセルは空白になっております。 よろしくお願いします。

  • Excelで単位が違う複数のデータを1つのグラフにする方法

    Excelで単位が違う複数のデータ(数量がかなり違うもの)を1つのグラフにする方法を教えて下さい。 例えば、横軸に年度、縦軸に人数、金額といったものとか、 また、横軸に位置、縦軸に気圧、風速といったものとか。 横軸の範囲は限られるのですが、縦軸にする複数のデータがかなり絶対値が違うものです。 「散布図」とか使えばできそうな気がするのですが。

  • 入力シートから別シートに転記・蓄積について

    エクセルで入力シートのA1:D5(5行)の範囲を別シート(DBシート)の転記・蓄積させる方法を教えてください。また、入力データがA1:A5(1行)のときもあれば、A1:D5(5行)の場合もあるとします。宜しくお願いします。

  • エクセルの横データを自動的に縦データに表したいです

    エクセルで以下のような入力をしたいと思っていますが、いい方法が見つからず困っています。「形式を選択して貼り付け」では上手くいきません。 (sheet1)    A     B     C     D 1   100   300   200   500 2 3      ↓ (sheet2)   A      B    C    D 1      100    2      300    3       200 4       500    と言う感じにsheet1で入力したデータを自動的にsheet2に入力できるようにしたいと思っています(sheet2の数値はB列に入っていると見てください)どうすれば良いでしょうか?何か関数を利用してこういうことはできるのでしょうか?よろしくお願いします

  • エクセルで日毎のデータの蓄積

    シートBにその日のデータを入力し、そのデータをシートAに蓄積していきたいです。 手作業ならば、 1.入力されたシートBのその日のデータをコピー 2.シートAの同じ日付の行を探し、値のみペースト とするのでしょうが、これを自動化したいです。 セル参照だと、毎日、同じ行にデータが上書きされていくため 無理っぽいし、マクロを使わないとできませんか? コピーとペーストはできそうですけど、「同じ日付の行を探し」というところが難しそうだなぁと思いました。。。 すみませんが、よろしくお願いします。 シートA(データ蓄積用) 日付   データ 12/1   データ1 12/2 ・ ・ 12/31 シートB(データ入力用) 日付   データ 12/2   データ2 ↑日付が変われば、同じ行にデータを上書き

専門家に質問してみよう