Try this: In each of your sort macros, turn AutoFilter mode off before sorting,
then turn it back on afterward. Don't know why, but when I experimented with it,
that worked.
Sub SortMacro1()
'Turn AutoFilter mode off
ActiveSheet.AutoFilterMode = False
'Your Sort routine
Range("A6:I15").Sort Key1:=Range("B6"), Order1:=xlAscending, Header:=xlGuess
'Go to A6 and turn AutoFilter mode back on
Range("A6").Select
Selection.AutoFilter
End Sub