vba help - sorting query which is right way sort data

[Mallesh23]

Hi Team,

In my below code Both gives me correct output , Only there is a change in Key1.

Single cell as key1
Multiple Cells as key1.


Which is Correct approach to sort the data....

Sub Sorting()

'Complete Range("a2:a10") as sorting key1
Range("a1").CurrentRegion.Sort Key1:=Range("a2:a10"), Order1:=xlAscending, Header:=xlYes

'Single Range("a2")as sorting key1
Range("a1").CurrentRegion.Sort Key1:=Range("a2"), Order1:=xlAscending, Header:=xlYes
    
End Sub

Below is Sample data

Book4
	A	B	C
1	Date	data1	data2
2	01/11/2020	xxx	yyyy
3	09/11/2020	xxx	yyyy
4	05/11/2020	xxx	yyyy
5	06/11/2020	xxx	yyyy
6	09/11/2020	xxx	yyyy
7	03/11/2020	xxx	yyyy
Sheet1

Thanks
mg

 

[ManiacB]

You can sort the data either way, by selecting the region or selecting the header. But you limit yourself if you select the range, since any new data will not be sorted. So the better soln is to just select the header, and excel will look at all rows under that header automatically.

 

[Mallesh23]

Hi ManiacB,

Thanks for your help, I got it


Thanks
mg