open_in_new
content_copy
Sub AutofitAllColumns() Cells.EntireColumn.AutoFit End Sub