Sort by column header name?

[mattyro1]

Hello Mr. Excel participants,

By chance does anyone know how to sort by column header names?

I my VBA coding allows to grap data from two worksheets and consolidate into 1 named Summary. Example indicated below...Now I need to sort by column names. Example: Customer Name, Manager, Consultant Name...etc ect.

Can anyone lead me into the correct direction...???




Example:
Sub Sort_Sheets()
Sheets("Active").Range("A6:T500").Copy
With Sheets("Summary")
.Range("A1").PasteSpecial
Sheets("Cancelled").Range("A7:T500").Copy
Sheets("Summary").Range("A65536").End(xlUp).Select
Sheets("Summary").PasteSpecial
End With
End Sub

 

[Upex]

try recording a macro of using an autofilter and look at the code, you'll then be able to tweek it as needed.

 

[mattyro1]

Thank you for your reply Upex...

Since I really only need this information sorted in order to populate into another worksheet, I simply used an IF statement with the appropriate columns needed.

 

[Upex]

Sounds good as long as it's got the required results.