sort data

Hi all,

I am trying to sort some data in my sheet after a refresh button is clicked.

I have this so far....

Rows(i:ilastrow).Select
Selection.Sort Key1:=Range("H3"), Order1:=xlDescending,    Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

the red bit is where i'm going wrong i know but i can't seem to figure it out.

any ideas?

Cheers,
spinkung