Insertメソッドで挿入 実は前回のDeleteメソッドと似ています。前回のソースでDeleteをInsertにすればほぼ、終了です。 'Sheet1のセルB1~D8にセルを挿入(下方向にシフト) Sub sample() Sheet1.Range("B1:D8").Insert Shift := xlShiftDown End Sub 以上です…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。