Sort need by macro

[Boris7265]

Hi,<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
<o></o>
I have hope that somebody will help me with this.<o></o>
<o></o>
I have very large spreadsheet that has been populated out from Access query -around 15000-20000 rows .I need to sort this spreadsheets by column M in order to work with it , but the spreadsheet must be highlight all from column A thru up to column W (Column W is the last row in the spreadsheet) and the all columns should be sorted accordingly as column M is sorted . I know that I can do it right in the file , but the problem is that the file is large and there are many users are working with the spreadsheet so I have gotten the task to program it due to many human mistakes . <o></o>
Thank you for any input and greatly appreciates your help.<o></o>
The Best Reagrds.<o></o>
.

 

[Smitty]

Welcome to the Board!

Why not sort it as part of the Access query itself?

 

[VoG]

Try

Sub srt()
ActiveSheet.UsedRange.Sort Key1:=Range("M2"), Order1:=xlAscending, _
        Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

 

[Boris7265]

Hi Smitty and VoG,

The problem is the the queiry is sorted in Access and it is arangment is right , but during the transferring to Excel file via VB code the datas have been uploaded not sorted . So far , we sort in Excel file until , we find out why the file uploaded not sorted eventhought it is correct in Access . The db is located on the share drive and it is bieng used hevily by many people , therefore there are not much time to look into vb code of db and work with it .So, the working macro in the spreadsheet so far better workingable solution rigth now.

I tried macro that Vog provied in the second post and it works nicely .So far I am going to use that macro provied by Vog , until I find out the problem with transferring Access into Excel.

Thank you very much for you help and time .

The Best Regards.