• 締切済み

エクセル複数行を一括で挿入する方法を教えてください

mu2011の回答

  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.2

マクロですが如何でしょうか。 (1)対象シートのタブ上で右クリック→コードの表示→VBE画面が表示されるので右上画面に以下のコードを貼り付け→F5キー押下 (2)VBE画面の貼り付けコードを削除→VBE画面終了 サンプルコード Sub 行数毎に空白2行挿入() Application.ScreenUpdating = False 行数 = 3 Range("A1").Select Do While ActiveCell.Offset(行数).Value <> "" ActiveCell.Offset(行数, 0).Rows("1:2").EntireRow.Select Selection.Insert Shift:=xlDown ActiveCell.Offset(行数 - 1).Select Loop Application.ScreenUpdating = True End Sub

haruka-haru
質問者

お礼

ご回答、どうもありがとうございます。 お礼が遅くなって申し訳ありません。 マクロも調べていたのですが 初心者の私にとっては、難しすぎてわからなかったので すごく嬉しいです!! 教えてくださって、どうもありがとうございました。

関連するQ&A

  • エクセルの表で10行毎に1行づず新しい行を挿入する方法

    こんにちは。 あるエクセルの表があります。1500行くらいあるのですが、10行毎に1行づつ新しい行を挿入したいのですが、 一気に簡単に実行する方法はありませんか? 初心者なのでとても苦労しています… 地道にやるしかありませんか? どなたか教えて下さい。

  • 複数行に空白行を一括で挿入したいのですが

    エクセルに関する質問です。 セルA列の14行目から30000行まである数字が入力されています。 各行間に一行ずつ空白行を挿入したのですが マクロを使ったやりかたでもかまいませんので 一括でする方法があれば教えていただけないでしょう?

  • エクセルで見出しの行を一括で挿入させたいです

    こんばんは。いつもお世話になっております。 よろしくお願いいたします。 エクセルで、同じ見出しの行をbook全体の全てのページに一括で挿入する方法はありますでしょうか。 全て同じ見出しを、一番上の行に挿入したいのですが・・ 何か良い方法がありましたらよろしくご教授お願いいたします。

  • エクセルで複数行の挿入方法

    エクセルで空行を挿入するときは、「挿入」→「行」で1行だけ 空行が挿入されますが、たとえば10行分いっぺんに挿入する 方法はあるのでしょうか?

  • エクセルの行挿入とコピー

    よろしくお願いいたします。     A    B   C    D 1  123  123   123   123 2   444  555   666  777 3   890   890   890   890 4   000   000   000   000 上のようなエクセルの表(Excel2003)があるとします。 この表の1行目と2行目の間に、1行目のデータを9行コピーするための方法を教えてください。 実行後は1~10行目は全く同じデータ、11~20行目に2行目のデータがあり、同じように末尾行まで繰り返すということです。 自分でも色々と検討してみましたが、なかなかうまくいきません。 行挿入だけであればできるのですが、コピーまで同時に実行する必要があります。 元の表は3000行ほどあるため、とてもじゃありませんが手動では実行できませんので、マクロで末尾行(Excel2003の65000行)まで自動実行する方法を教えていただきたいのです。 すみませんがよろしくお願いいたします。

  • エクセルの行挿入

    エクセル2007を使用。 表に多数(約30行)の空白行を挿入する方法を教えてください。

  • エクセル2003~行挿入できない~

    すみませんが、お分かりの方いらっしゃいましたら教えてください。 エクセル2003(XP)を使用しております。 作成中の表に、行を挿入したいと思い、実行すると、 「データの消失を防ぐため、空白でないセルをワークシートの外にシフトすることはできません」 と表示されエラーが出ます。 どのようにすれば、行挿入が可能になるでしょうか。 お手数お掛け致しますが、よろしくお願い致します。

  • エクセル2002での行の挿入方法について

    エクセルで表を作成した後に、全ての行の下行に もう1行付けたしたくなりました。 下の例でいくと×の行です。 どのようにすれば一括で1行増やせるのかご教示 願います。 ◎◎ ○○ △△ ↓ ◎◎ × ○○ × △△ ×

  • excelで行挿入について

    excel97を使っているのですが、まず下の表を見てください。 行/列   A  B  C   1  メーカ      2  あ           3  い             4  合計           5  う         6  え           7  お              8  か                このような表があるのですが、行1~4で一つのグループなんです。 同じように  行4と行5の間に「メーカ」  行6と行7の間に「合計」 というふうに「メーカ」挿入、2行空けて「合計」挿入、「メーカ」挿入・・・を約千行分繰り返して 行/列  A  B  C  1  メーカ      2  あ      3  い      4  合計      5  メーカ      6  う      7  え      8  合計      9  メーカ     10  お     11  か     12  合計     このようにしたいのですが、簡単な方法は無いでしょうか?

  • EXCELで指定範囲に一括して行を挿入

    EXCELで指定範囲のセルに、一括して一行置きに行を挿入出来る関数があれば教えてください。