• ベストアンサー

Excelでのコピー貼り付けを繰り返すマクロ

B4セルをコピーしてB5に貼り付け。 B6セルをコピーしてB7に貼り付けという感じで、コピーと貼り付けを連続して行いたいです。マクロの記録でやっていけると思い色々やっていますが、どうもうまくできません。 皆さん教えて頂けませんか。

質問者が選んだベストアンサー

  • ベストアンサー
  • xls88
  • ベストアンサー率56% (669/1189)
回答No.1

Range("B4").Copy Range("B5:B10") というようなことでは駄目ですか? 色々、どうやって、どう上手くないのかを説明されて、相談された方が良いと思います。 同時に、記録されたコードでも良いので、掲載してください。

その他の回答 (2)

回答No.3

どう連続させるのか分かりませんが、同じ動作を場所をずらしながらやるのであれば、for分でループさせるのが定番かと。

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.2

コピー元とコピー先をOFFSETしながらやるとか?

関連するQ&A

  • コピー貼り付けのマクロの処理時間の早い方法を教えてください。

    ある表の中から部分的にセルを指定して抜き出して、 別の表を作成しています。 コピーする範囲のセルが連続して繋がっていないので、 セルを一つづつ指定してコピーして貼り付ける動作をマクロの自動記録で登録しました。 コピー貼り付けの回数が100セル分ほどあるので、処理時間が遅いです。 目で見て順番にデータがコピーされて行くのが分かるくらいです。 この動作をもっと速くするマクロを教えてください。 実際の表ではコピー元(sheet1)のA5→コピー先(sheet2)C1、 以下同じくコピー元は全て(sheet1)でコピー先は(sheet2)です。 A8→C2、A11→C3、A14→C4、A17→C5,・・・・ B2→D1、B12→D2、B22→D3、B32→D4,・・・・ このような感じでコピーします。 *コピー元のsheet1の指定セルは毎回同じ場所です。 コピー先も毎回同じセルです。 宜しくお願いします。

  • エクセルのマクロについて教えて下さい

    エクセルで、データ(書類)のコピー貼り付けのマクロを組みました。 ツール→マクロで、新しいマクロの記録から、実際にコピーをして貼り付けをし、記録の終了をしました。 次に他のセルの場所でもそのマクロを実行して、何度も場所を変えてコピー貼り付けを実行したいのですが、操作用のボタンを作成して貼り付け、ボタンを押すと、同じ場所でコピー貼り付けを繰り返します。 たしか絶対参照とか相対参照とかあったような気がするのですが…。 どうすれば、他の場所でもボタンを押すだけでコピー貼り付けのマクロを実行できるようになりますか? よろしくお願いします。

  • Excelで「形式を選択して貼り付け」のマクロの作り方

    WinXPです。 Excelで 1.コピー元セルの値をコピーします。 2.コピー先セルを選択します。 3.コピー先セルを右クリックして 4.「形式を選択して貼り付け」を選択します。 5.「罫線を除く全て」を選択します。 ここでコピー元セルもコピー先セルも位置関係はなくランダムです。 上の4.5.のみのマクロを作りたいのですが うまくいきません。 VBAは全くわかりませんが、以前5.の部分が「値」に したものをカーソルの操作を記録することにより 作ってあります。(Win98ですが) したがって今回も5.が違うだけですから 同様にできると思うのですが 昔のことで方法が忘れてしまいました。 単純に4.5.をマクロに記録して、実行したら 「シンジのメソッドが・・・」というエラーに なってしまいました。 よろしくお願いします。

  • 離れたセルのリンク貼り付けを行うためのマクロについて

    ブック(1)のシート(1)にある複数の離れたセル(B2,D2,C3,F3,B4:F4)をコピーし、別ブックのシート(1)のセル(B2,D2,C3,F3,B4:F4)へリンク貼り付けを実行するためのマクロを教えてください。 なお、ブック(1)とブック(2)はイントラの共有フォルダ上の同一階層に置いてあります。 このブック(1)と同一フォーマットのブックが複数存在し、上記同様にブック(2)の離れたセルをコピーして別ブックのシート(2)のセルへリンク貼り付け。 続いて、ブック(3)の同じセルをコピーし別ブックのシート(3)へリンク貼り付けと言うように、同じセルをコピーし別シートの同じセルへリンク貼り付けの作業を繰り返し行います。 まったく同じ位置のセルをコピー&リンク貼り付けを繰り返し行いたいので、マクロを使って自動実行させたいと思っています。 離れたセルのリンク貼り付けは出来ないのかもしれないですが、アドバイスを頂けると助かります。 宜しくお願い致します。

  • エクセル マクロ コピー 貼り付けについて教えて!

    お世話になります。 エクセルのマクロを利用し下記の 方法はできますでしょうか。 条件:1つのフォルダ内に2つのエクセルデータがあります。 (1)「リスト」名のエクセルデータ (2)「送付状」 (1)「リスト」名のエクセルには下記の内容があります。   A       B  1 山田 03-0000-0000 2 佐藤 04-0000-0000 3 樋口 05-0000-0000 4 加藤 06-0000-0000 「リスト」名のエクセルには事前にマクロを組みます。 (ここを教えてください!) マクロを起動すると (2)「送付状」のエクセルデータごとコピーし ファイル名を「リスト」のB1とします。 例:ファイル名/03-0000-0000 03-0000-0000のファイルを開き A3に「リスト」のA1をコピーし貼り付けます。 C10には「リスト」B1の電話番号をコピーし貼り付けます。 これでファイル名03-0000-0000を保存します。 次に同じ動作を繰り返しますが 新しく作成したエクセルファイル(貼り付け先) のコピー元((1)リスト)はA1またはB1 から次行のA2またはB2と行を変えてコピーし 貼り付け場所は変わらずA3・C10とします。 (1)「リスト」A1欄が空欄になるまでこの動作を つづけ、終わったら「完了」表示がされ作業終了にしたいです。 完成形 (1)「リスト」に100件の名前があった場合 フォルダ内には (1)「リスト」、(2)送付状 その他100件の電話番号名のエクセルファイル が存在する。 お手数をおかけいたいます。 宜しくお願いいたします。

  • エクセルで?簡単にコピー、貼り付けしたい!

    エクセルのセルのデータを簡単にコピー、貼り付けをしたいです。 A列にタイトル B列にURL C列に本文(1つのセルに300文字適度で改行が含まれる) が約500件ほど入っているとします。 今、やっている作業はAタイトル、BURL、C本文を1つずつ手作業でコピーして別のソフトに貼り付けると言う作業を行っています。 また、Cの本文はそのままコピーして貼り付けするとダブルクォーテーションが入ってしまう為、セルの内容だけをコピーして貼り付けていると言うめんどくさい作業を行っています。 そこで質問なのですが、例えば、A1,B1,C1など各セルにカーソルにおいた状態でボタンを押せば簡単に貼り付けができるようにしたいのですが、こんな事は出来ないでしょうか? 只今、約50件ぐらいまで手作業で行ったのですが、面倒なので簡単に出来る方法を探しています。 何かいい方法はないでしょうか? よろしくお願いします。

  • 行コピーして、今日の日付の行に貼り付けるマクロ

    こんにちは、エクセルマクロについて、助けて頂きたく質問させていただきました。 添付しました画像のような表があり、 セルA2に「=TODAY()」が入っていて、セルB2から右は別シートのデータを参照しています。 マクロを実行すると、2行目を行コピーし、セルA3以下の日付からセルA2の日付(今日の日付)を探し出して、行貼り付けしてほしいです。 行コピーや値で貼り付けはマクロの記録を使って、詳しくない私でもなんとか作ることはできるのですが、 今日の日付を探し出して、そこに貼り付ける。というマクロは作れませんでした・・・。 お助け下さい、宜しくお願いします! ※補足します セルA2の今日の日付は便宜上入力しているだけです。無い方がマクロを組みやすいのなら、無くせます。

  • マクロでコピー貼り付けするには・・・

    マクロでコピー貼り付けするには・・・ マクロでファイルを呼び出し、そのファイルにコピー→貼り付け(値)するにはどのようにすれば良いのでしょうか? 具体的な方法は・・・ 添付のようなエクセルがあるとします。くだもの、野菜、肉、飲み物のそれぞれの項目に対して、データがあります。ここはある表より割り出されるもので、計算式が入っています。 このような表の下にある「ファイル呼び出し」ボタンをクリックすると、別のエクセルファイルが開いて、そこに これらのデータを貼り付けるのをマクロで行いたいのです。 どのように行えば良いのでしょうか? ご教授願います。以上、よろしくお願いします。

  • 横にコピーするマクロを教えてください。

    エクセルでのコピー・貼付けを、簡単なマクロで処理する方法を教えてください。 現在、セルB3からD8までを入力表とし、入力した数値をコピーして I3からK8に貼付け、また入力表に新たな数値を入力して横のl3からN8に コピ-貼付けと横にコピー貼付けを行っていき、F3からH8には自動的に 集計が上がるようにしています。 このコピー貼付けをボタンで行うマクロをどなかた教えてください。 よろしくお願いいたします。   

  • エクセルマクロで上書きして貼り付けの方法は

    エクセルのマクロでコピーして貼り付けする場合、貼り付けするセルに何か入力されているとその次の行に飛んで貼り付けしてしまいます。 何か入力されていても上書きで貼り付けする方法を教えてください。次のマクロを参考にお願いします。 Sub 全体名簿へ2組() ' ' 全体名簿へ2組 Macro ' ' 開始 = Range("r3").Value 終了 = Range("s3").Value Range("B" & 開始 + 1 & ":n" & 終了 + 1).Select Selection.Copy Windows("全体名簿.xlsm").Activate Sheets("★名簿").Select Range("B65536").End(xlUp).Offset(1).Select ActiveSheet.Paste End Sub このActiveSheet.Pasteを変えるとできるのかその方法がわかりません。 また,貼り付けする前に選んだセル以降の行をクリアーにしてから、貼り付けすればできますがその範囲の指定の仕方はどうすればいいのでしょうか。マクロの文も教えていただきたいです。

専門家に質問してみよう