重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら＞

電子書籍の厳選無料作品が豊富！

エクセルVBA

解決済

  • 質問者：domiki
  • 質問日時：
  • 回答数：1件

選択しているセルが1セルの場合は、その行を1行ごと、
例えばB10にセルがあれば、10行めを行コピーして11行めに、行挿入、
選択しているセル範囲が3セルの場合は、そのセルのある3行をコピーして
例えばB10:B13を範囲選択していたら、10～13行めを行コピーして、
14行めに3行まとめて挿入するようなマクロ作るには、
どのように記述したらいいでしょうか？
コピー元には、計算式を含むセルがあります。
貼り付け先には、その計算式もコピペされているとベストなんですが・・・

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： monamucho
  • 回答日時：

選択範囲の全行をコピーして、まとめて挿入する例です。


計算式もコピペされます。

With Selection
.EntireRow.Copy
Rows(.Offset(.Rows.Count).Row).Insert Shift:=xlDown
End With
Application.CutCopyMode = False
    • good
    • 0
    • 件
通報する
この回答へのお礼

希望通り動いてくれました。
ありがとうございました。

通報する
お礼日時：2014/01/08 17:38

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報