步驟：如圖：
1、按Alt+F11打開VBA代碼編輯器
2、點擊頂部的“插入”---模塊
3、雙擊左側欄中的模塊
4、在模塊的右側的代碼編輯區粘貼代碼
5、點擊畫粉紅色圓圈的按鈕，可運行代碼。
Sub ChaHang()
Dim i As Integer
For i = 6 To 3 Step -1
Rows(i + 1).Resize(2).Insert
Next
End Sub
註意1：
代碼中，行號範圍6 to 3，大數寫在前面，不能寫為 3 to 6。
可以根據自己的實際情況修改行號數字，但必須大數在to前面，小數在to後面。
註意2：
Resize(2)這括號內的2是指插入2行，可根據自己的實際情況，修改這個數字。
註意3：
如果妳的excel文件是.xlsx格式，當妳關閉excel文件時，會彈出提醒妳，代碼會丟失。
妳可以點“是”，另存為.xlsm格式(啟用宏的工作簿)，這樣下次打開文件時代碼還在。
也可以點“否”，保持原來的.xlsx格式，這樣下次打開文件時，只是代碼沒有了而已。