Cacher is the code snippet organizer for pro developers

Sub format_pageviews_csv()

With ActiveWorkbook.ActiveSheet.Range("A1:B1, J1, L1:M1, P1:Q1, S1").EntireColumn
    .Delete
End With

ActiveWorkbook.ActiveSheet.Range("B1:K1").EntireColumn.AutoFit
ActiveWorkbook.ActiveSheet.Range("A1").EntireColumn.ColumnWidth = 140

With ActiveWorkbook.ActiveSheet.Range("A1:k1")
    .Font.Bold = True
    .AutoFilter
End With

End Sub