Thursday 13 November 2014

AutoFit Rows and Columns

Sub AutoFit_RowsColumns()
 
ActiveSheet.UsedRange.EntireColumn.AutoFit
ActiveSheet.UsedRange.EntireRow.AutoFit


End Sub

No comments:

Post a Comment