Sorteren met macro

[hapdruijts]

Heel vreemd. Als ik in bijgaande macro uitvoer neemt hij steeds de kopregel niet mee.
Heb de macro opgenomen. Wat doe ik fout.
Hij sorteert dus de kopregel mee.

Columns("A:H").Select
Selection.Sort Key1:=Range("F2"), Order1:=xlAscending, Key2:=Range("D2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal

 

[Haije]

Heel vreemd. Als ik in bijgaande macro uitvoer neemt hij steeds de kopregel niet mee.
Heb de macro opgenomen. Wat doe ik fout.
Hij sorteert dus de kopregel mee.

Columns("A:H").Select
Selection.Sort Key1:=Range("F2"), Order1:=xlAscending, Key2:=Range("D2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal

Verander dit eens: Header:=xlGuess in Header:=xlYes