Sub remove_TTI_Comments()
'
' remove_comments Macro
' Macro recorded 12/18/2014 by Pete
' Copy and paste all of your separate CSV files imported from TTI into one file
' then open that file in excel and run this macro to remove all
' comments which will make it WWB6 compatible
'
    Dim lastrow As Range
    Dim last As Integer
    Application.ScreenUpdating = False
    Range("A1").Select
    Selection.CurrentRegion.Select
    Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Set lastrow = ActiveSheet.Cells.Find("Auto RBW*")
    last = lastrow.Row
    ActiveSheet.Range(Rows(last), Rows(last + 100)).Select
    Selection.Delete
    Application.ScreenUpdating = True
    ActiveWorkbook.Save
    ActiveWorkbook.Close
End Sub