Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!!!!!
 

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)

Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!!!!!
 

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

Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!
 

Thanks Dave.
I was thinking of actually using both versions by inserting an:
If Application.Version12.0 then
Use xl2007 syntax
ElseIf Application.Version<12.0 then
Use xl2003 syntax
End If

"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
.

Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!
 

Unless you're doing something unique to xl2007, I wouldn't bother.

Ayo wrote:

Thanks Dave.
I was thinking of actually using both versions by inserting an:
If Application.Version12.0 then
Use xl2007 syntax
ElseIf Application.Version<12.0 then
Use xl2003 syntax
End If

"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
.


--

Dave Peterson

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, _

Help with SORT property in xl2007 and xl2007 !!!!!!!!!!!!!!!!!!!!
 

Thanks for the correction.



Javed wrote:
<<snipped

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

--

Dave Peterson