vba code for autofit code example

Example: vba column autofit

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