autofit table excel macro code example

Example: vba column autofit

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