vba autofit a cell range code example

Example: vba column autofit

Worksheets("Sheet1").Columns("A:I").AutoFit