EXCEL應用技巧：如何在每行下插入一個空行

 一張數據表格，想在每一行下插入一個空行的簡單快捷的方法，那就是編寫宏函數：

打開excel的VB編輯窗口新建一個模塊,將代碼複製,運行即可:
Sub addrows()
For i = Application.WorksheetFunction.CountA(Range("A:A")) To 2 Step -1
Rows(i).Select
Selection.Insert Shift:=xlDown
Next
End Sub