別Sheetに入力終了と同時に表を完成させたい

質問

すみません、この画像データーでも見にくいでしょうか。
Excelで添付のファイルにあるように、Sheet1にデーターを入力しながら、Sheet２に入力終了と同時に表が完成しているようにしたい。初心者でマクロは使えないので、関数を使ってできないものかお伺いしたいのですが、お教え下さいませんか。

回答No.5

noname#204879 · ベストアンサー

Sheet2!A2: =OFFSET(Sheet1!$A$3,(ROW(A1)-1)*3,COLUMN(A1)-1)

お礼

質問の仕方をもっとよく考えてやるべきでした。でも大変助かりました。ありがとうございました。

補足

=OFFSET(Sheet1!$A$3,(ROW(A1)-1)*3,COLUMN(A1)-1)にて、できました。ありがとうございます。できあがったものをソートはできないのですね。最初で言っておくべきでした、無理でしようね。ネットで関数をみながら色々と試してみましたができなかったことができて、ほんとうにありがとうございました。面倒な処理がこれで解消できて大変うれしいです。

回答No.7

keithin

ANo.4ですが、回答に誤記がありました。

間違い：
=Sheet1!A2%""

正解：
=Sheet1!A2&""

失礼しました。

これで「ありがとう」のお返事があったってのは、「実際にやってみた」んじゃなくてただ目で見てそーかそーかと口で言ってるだけって事かなと思います。

で。
ANo.4の前半の方法を実際にやってみると「並べ替え」も全く問題なくできますので、「読んで判ったつもり」じゃなく、「実際に手を動かして」教わった方法をそれぞれ試してみて下さい。

お礼

、「実際に手を動かして」教わった方法をそれぞれ試してみて下さい。この通りでした、見たのと実際やるのとでは違いがあることにも気づく必要がありますね。ありがとうございました。

回答No.6

noname#204879

[No.5補足]へのコメント、
》 できあがったものをソートはできないのですね。
嗚呼、言ったこっちゃない！
元の質問(番号 8466205) の[No.2]で「入力データと全く同じ並びで表示させたいと？」と述べたのは、そのことを予測したからです。
貴方は「最初で言っておくべきでした」ね。

お礼

貴方は「最初で言っておくべきでした」ね。その通りでした、後から気づいてしまって質問の仕方をよく考えてやるべきでした。色々お教え下さりありがとうございました。

回答No.4

keithin

１行目にタイトル行、２行目から（３行ずつ使って）データ、Ａ列から記入してある状態にしておいてから。

手順：
シート２のＡ２に
=Sheet1!A2%""
と記入、Ｄ２セルまでコピー貼り付ける
Ａ２：Ｄ４を選択、右下隅の小さい■を下向けにオートフィルドラッグする
Ａ：Ｄ列を列選択する
Ｃｔｒｌ＋Ｇを押し、現れたダイアログでセル選択をクリック、現れたダイアログで空白セルにマークしてＯＫする
飛び飛びに選択されるのを崩さないように気を付けながら右クリックして削除を選び、上に詰める
改めてタイトル行を挿入して完成。

＃手を動かすのがイヤな時は：
シート２のＡ２に
=INDEX(Sheet1!A:A,ROW()*3-4)&""
と記入し、右に下にコピーする。

お礼

ありがとうございます。ネットで関数をみながら色々と試してみましたができなかったことができて、ほんとうにありがとうございました。面倒な処理がこれで解消できて大変うれしいです。

回答No.3

某HN クロメート(Chromate)（@CoalTar）

Sheet2!A2セルへ
=INDEX(Sheet1!A:A,ROW(A2)*3-3)&""
か
=INDEX(Sheet1!A:A,ROW(A2)*3-4)&""
右へ下へオートフィル

行番号 列番号不明なので勘

お礼

完成できました。お世話になりました。

補足

=INDEX(Sheet1!A:A,ROW(A2)*3-3)&""にて、できました。ありがとうございます。できあがったものをソートはできないのですね。最初で言っておくべきでした、無理でしようね。ネットで関数をみながら色々と試してみましたができなかったことができて、ほんとうにありがとうございました。面倒な処理がこれで解消できて大変うれしいです。

回答No.2

Nebusoku3

１）Sheet2 のデータを持って行きたい所をクリック（Sheet1と同じセル、例：「品質」が良いかも）します。
２）そこに、半角の　　= を手入力します。
３）その状態から　Sheet1 のタブ（下にある）をマウスでクリックし、「品質」　を選び　”Enter”　キーを押すと　Sheet2に　転記されます。

他も同じように出来ますので応用してみてください。
枠線は罫線でできますね？

お礼

ありがとうございます。ネットで関数をみながら色々と試してみましたができなかったことができて、ほんとうにありがとうございました。面倒な処理がこれで解消できて大変うれしいです。

回答No.1

aokii

Sheet1もSheet2もA1セルから表が有るとして、

Sheet2のA2セルに以下の式を入れて、下と右にドラッグコピーしてみて下さい。

=INDEX(Sheet1!$A$2:$D$300,(ROW(A2)-1)*3-2,COLUMN(A2))

お礼

ありがとうございます。ネットで関数をみながら色々と試してみましたができなかったことができて、ほんとうにありがとうございました。面倒な処理がこれで解消できて大変うれしいです。