前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
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。