1.打開excel表格“視圖”
2.錄製一個空白宏
3.編輯宏
Sub singleRowAdd()
'
' singleRowAdd 宏
' 給整個表單數據行添加指定高度
'
For i = 1 To ActiveSheet.UsedRange.Rows.Count
Cells(i, 1).RowHeight = Cells(i, 1).RowHeight + 10
Next
End Sub
4.執行宏
1.打開excel表格“視圖”
2.錄製一個空白宏
3.編輯宏
Sub singleRowAdd()
'
' singleRowAdd 宏
' 給整個表單數據行添加指定高度
'
For i = 1 To ActiveSheet.UsedRange.Rows.Count
Cells(i, 1).RowHeight = Cells(i, 1).RowHeight + 10
Next
End Sub
4.執行宏