Why my sorting VBA ain't sort ?

[Saab95]

Hi there,

I have the below VBA that is supposed to do a sort. No error when I run it but no sorting either and I'm sorting normal figures(1, 2, 3)

Sub ECB_Sort()
Dim Sortrange As Range
With Sheets("ECB")
Set Sortrange = .Range("A2:AB2100")
Sortrange.Sort Key1:=.Range("L1"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End With
End Sub

 

[Fluff]

What row is the header row?

 

[Saab95]

What row is the header row?

Hi Fluff,

Row 'A'

Thks

 

[Saab95]

Fluff,

Row '1', not 'A'. Sorry my mistake.

 

[Fluff]

In that case try

Set Sortrange = .Range("A1:AB2100")

 

[Saab95]

In that case try

Set Sortrange = .Range("A1:AB2100")

Indeed ?‍. Thanks

 

[Fluff]

You're welcome & thanks for the feedback.