Cara Sisipkan Pelbagai Blank Rows dalam Excel

Mewujudkan makro di Microsoft Excel menawarkan pengguna keupayaan untuk mengautomasikan tugas berulang dan boleh diramalkan dalam program ini, selalunya menjimatkan jam.

Masukkan Baris Blank Antara Penyertaan Data

Jika anda ingin mencipta makro yang akan memasukkan 2 baris kosong ke dalam hamparan sedia ada selepas setiap 2 entri data, ada makro yang tersedia yang dapat membantu anda melakukannya. Hasil akhirnya harus kelihatan seperti ini:

Tata letak lalai:

 Tajuk1
Tajuk2
Tajuk3
Tajuk4 

Selepas Macro:

 Tajuk1
Tajuk2
Tajuk3
Tajuk4 

Memasukkan Barisan Blank Berbilang Antara Data Sedia Ada

Menggunakan makro berikut akan membawa anda hasil yang digambarkan di atas:

 Ujian subjek ()
Dim J As Long, r As Range
j = InputBox ("taipkan bilangan baris yang akan dilemparkan")
Tetapkan r = Julat ("A2")
Lakukan
Julat (r.Offset (1, 0), r.Offset (j, 0)). EntireRow.Insert
Tetapkan r = Sel (r.Row + j + 1, 1)
'MsgBox r.Address (apostrophe pada permulaan baris ini menjadikan baris ini tidak dapat dikendalikan)
Jika r.Offset (1, 0) = "" Kemudian Exit Do
Loop
Sub Akhir