Sort Header -- Stop Guessing

This one line of code prevents Excel from guessing the header during sort.

Sub MySort()
temp = Application.Dialogs(xlDialogSort).Show(Arg8:=xlNo)
End Sub

Even though it's only one line of code, I think it's useful, and I couldn't find it anywhere.

It calls the built-in Sort Dialog Box with header:=xlNo
It's also possible to make Excel always use the first line as the header by changing xlNo to xlYes.
On my computer, I changed the Sort menu option to run the above routine instead of calling the Sort Dialog in the usual way because I never want Excel to guess the header during sort.

Re: Sort Header -- Stop Guessing

There's one unfortunate thing about this way of sorting: it's difficult to undo. Because of this difficulty, I would advise against using this way of sorting, especially for novice users. Excel doesn't automatically provide an undo option for VBA code. In order to undo VBA code it's necessary to write a separate section of the code. In this case, it would have to remember the region sorted (selected prior to sort) and the order of those rows and columns.