给excel单元格添加上下边框距离
前20行代码添加单元格上、下边框距离
Sub padding() For i = 1 To 20 Range("a1").Cells(i).RowHeight = Range("a1").Cells(i).RowHeight + 10 Next End Sub
前20行代码添加单元格上、下边框距离
Sub padding() For i = 1 To 20 Range("a1").Cells(i).RowHeight = Range("a1").Cells(i).RowHeight + 10 Next End Sub