Excel VBA マクロの行をコピーする方法を紹介します。Rows.Copy メソッドまたは Range.Copy メソッドで行をコピーできます。Rows.PasteSpecial メソッドまたは Range.PasteSpecial メソッドで貼り付 … 次のサンプル1は、3行目以降の行に1行おきに空白行を挿入します。 サンプル1 Sub Sample1() Dim myLastRow As Long Dim i As Long 'データの最終行を取得 myLastRow = Cells(Rows.Count, 1).End(xlUp).Row '最終行から上方向にループ For i = myLastRow To 3 Step -1 Rows(i).Insert Shift:=xlDown Next i End Sub 繰り返し処理 For～Next topへ. 繰り返す回数が決まっている場合、指定回数ステートメントを実行します。 C1からC10までにA1*B1の計算結果を入力する。 Excel VBA マクロの行を選択する方法を紹介します。Rows.Select メソッドまたは Range.Select メソッドから行を選択できます。選択している行を取得したり解除できます。 Excel VBA マクロの行を挿入する方法を紹介します。Rows.Insert メソッドまたは Range.Insert メソッドで行を挿入できます。 ワークシート上に画像を挿入するには、次のようにします。 Sub Macro1() ActiveSheet.Pictures.Insert "C:\Work\Sample1.jpg" End Sub 画像を、アクティブシートに挿入するときは、必ずアクティブセルに挿入されます。正確に言うと、アクティブセルの左上に画像の左上がくるように挿入されます。 次のよう … したがって、2行に空行が挿入されることになります。なお最後の「亨」の後ろも改行されません。 Sub test83() Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject") ''「田中」と「亨」の間に2行の改行を書き込みます With FSO.GetFile("C:\Work\Sample.txt"). セルの値・数式・書式などを単純にコピー＆ペーストするには Copy メソッドを使用します。空のセルを挿入またはコピーしたセルを挿入する場合は Insert メソッドを使用します。セルを削除したい場合は Delete メソッドを使用します。 VBAで複数行を選択する （2017.01.04） RangeクラスのHiddenプロパティを設定できません。とは？ （2016.11.02） VBAで行挿入を行う （2016.10.27） RowsとRowの違い （2016.10.18） VBAで選択セルの列全体・行全体を選択する （2016.07.27） 以下のマクロは、選択セルがある行の内容をすぐ下に挿入できます。 Ctrl + Dキーと同様に複数行にも対応しています。 挿入、として動作するため既存の下のデータへの上書きは行わないため、入力済みのデータを破壊することもありません。