Sub Column_size() ActiveSheet.Columns.AutoFit End Sub