open_in_new
content_copy
Sub AutofitSpecificColumns() Range("D:D,F:F").EntireColumn.AutoFit End Sub