VBA question

[noob]

What would be the VBA to automatically sort by 2 levels after the current macro is done running ? Or do I just edit existing macro ? Please keep in mind that I do not have any VBA experience but I'm good at connecting dots any help would be appreciated. Thank You

This is what the VBA ends with

With ActiveSheet.PageSetup
.LeftHeader = "&""Arial,Italic""&14DRIVER:____________________"
.CenterHeader = "&""Arial,Bold""&14ROUTE:_______________"
.RightHeader = "&""Arial,Italic""&14DATE:______________________"
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = "&""Arial,Italic""&P OF &N"
.LeftMargin = Application.InchesToPoints(0.25)
.RightMargin = Application.InchesToPoints(0.25)
.TopMargin = Application.InchesToPoints(0.5)
.BottomMargin = Application.InchesToPoints(0.5)
.HeaderMargin = Application.InchesToPoints(0.25)
.FooterMargin = Application.InchesToPoints(0.25)
.PrintHeadings = False
.PrintGridlines = False
.PrintComments = xlPrintNoComments
.PrintQuality = 1200
.CenterHorizontally = False
.CenterVertically = False
.Orientation = xlLandscape
.Draft = False
.PaperSize = xlPaperLegal
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
.BlackAndWhite = False
.Zoom = 100
.PrintErrors = xlPrintErrorsDisplayed
End With




Sheets("COM").Select
Application.DisplayAlerts = False
Application.Dialogs(xlDialogSaveAs).Show




End Sub

 

[Smitty]

Why not just record a macro applying the sort the way that you want it, then append it to the existing code?