Trouble sorting as part of a Macro

Hello, So I found some code that does the sorting that I want but when I try to run the Function as part of a macro the sorting does not work. Through a google search I found this code:

Code:

---

Sub Sortmybin()
Range("f2").CurrentRegion.Sort _
Key1:=Range("f2").CurrentRegion.Sort _
Order1:=XLDescending, _
Header:=XLyes


End Sub

---

but I am getting a compile error for Expected end of Statement on the Order1 line.

Any ideas?

Thank you.

Shouldn't it be

Code:

---

Sub Sortmybin()
    Range("F2").CurrentRegion.Sort _
        Key1:=Range("F2"), _
        Order1:=xlDescending, _
        Header:=xlYes
End Sub

---

Yes sir that compiled. Now to see if it does what I am hoping. This is my first time using this forum. Do I owe you for your help?

Yes of course you owe me, I'll be round to your house for a beer, once life allows such things again :(

Quote:

---

Originally Posted by Bob Phillips

Yes of course you owe me, I'll be round to your house for a beer, once life allows such things again :(

---

Haha, you're on. Thank you very much.

If I can't figure out:banghead: how to do the little project I am working on would you be interested? But if it goes that route I insist in paying you more than some beers:yes

If you do struggle, just PM me and I will check whether it warrants a gig, or whether it is just something to be addressed here on the forum (determined by the complexity).