Thread: Sorting Problem
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Helmut Helmut is offline
external usenet poster
 
Posts: 111
Default Sorting Problem

excel 2007

what's wrong with the following sort?

Sub Macro1()

Range("B3").Select
lastrow = Range("B" & Rows.Count).End(xlUp).Row
Set SortRange = Rows("3:" & lastrow)
SortRange.Sort , key1:=Range("C2"), _
order1:=xlAscending, _
key2:=Range("B2"), _
order2:=xlAscending, _
Header:=xlYes

End Sub

It stops at SortRange.Sort