View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Javed Javed is offline
external usenet poster
 
Posts: 91
Default Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!!!!!

On Apr 28, 11:01*pm, Dave Peterson wrote:
xl2007 still supports the old syntax. *So you could create the macro (record
it???) in xl2003 and it'll work ok.

This may help (or not!):

* * Dim wks As Worksheet
* * Dim myRng As Range

* * Set wks = Worksheets("Sheet9999")

* * With wks
* * * * Set myRng = .Range("A3:x" & BO_DownloadWS_lastRow)
* * End With

* * With myRng
* * * * .Cells.Sort _
* * * * * * key1:=.Columns(1), order1:=xlAscending, _
* * * * * * key2:=.Columns(3), order1:=xlAscending, _
* * * * * * header:=xlYes
* * End With

This is sorting A3:X(lastrow) by columns A and C. *And the data has header in
the first row.

Ayo wrote:

I have this line of code in my macro. Someone with Excel 2003 can go past it.


BOReportWS.Sort.SortFields.Clear


Is there a way to get it to run in xl2003?


'BOReportWS.Sort.SortFields.Add Key:=Range("A3:A" & BO_DownloadWS_lastRow)


--

Dave Peterson


This line is wrong key2:=.Columns(3), order1:=xlAscending, _
This line is correct key2:=.Columns(3), order2:=xlAscending, _