Masukkan baris VBA

Range("b4").EntireRow.Insert
Innocent Impala