• 締切済み

Excelにて

1,2,3と3つのシートがあります。 1で入力した項目は2のシートに横一列に並べられます。 最初から1列でいいのではと思われるかもですが入力の都合こうしています。 必要な項目をすべて入力したらマクロを実行して 2のデータA~BIまでの値を3のシートに移したいです。 3にデータを移す際に入力済みのデータの下に貼り付けを行いたいのですがうまくいきません。 どなたか教えて頂けると助かります。 説明不足の処もあるやもですので必要に応じて補足はさせて頂きます。 申し訳ありませんが宜しく御願い致します。

みんなの回答

  • keithin
  • ベストアンサー率66% (5278/7941)
回答No.1

作成例:2シートのA1:BI1のセルの値を、3シートに転記する sub macro1()  worksheets("3").range("A65536").end(xlup).offset(1).resize(1,61).value _ = worksheets("2").range("A1:BI1").value end sub やることは単純で 1.どこのセル範囲を対象にしてコピーしたいのか決める 2.どこのセルに持っていけば良いのか、今の実際のシートの状態の調べ方を決める 3.対象のセル範囲の値を目的のセルに転記する 以上です。 問題は、ご相談を読んでもかろうじて「A~BI」と書かれてるだけで具体的にどのセル範囲から転記したいのか、また具体的にどこ番地のセルに持っていきたいのか、さっぱり「あなたのエクセルの姿が目に見える」説明が無いってことです。 言わずもがなですがホントのシート名とか、ちゃんとあなたのエクセルの実際の姿にあわせてキチンと修正してから実行してください。 説明不足をイチイチ確認してから改めて丸写しできるマクロを作成し回答として投稿するのはただの二度手間なので、回答を参考にご自分で修正してご利用ください。

関連するQ&A