MACRO Run Time Error 1004

G

Guest

Anbody have any ideas why this macro is generating a Run Time Error 1004 on
certain machines?

Sub Sort()
'
' Sort Macro
' Macro recorded 30/06/2006 by mintt
'

'
Range("A2:B52").Select
Selection.Sort Key1:=Range("B3"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A2").Select
Sheets("Cash Imprest").Select
ActiveWindow.LargeScroll Down:=1
Range("G48:J98").Select
Selection.Sort Key1:=Range("I49"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
ActiveWindow.LargeScroll Down:=-1
Range("A1:M2").Select
Sheets("New Codes").Select
Range("A1").Select
End Sub
 
D

Dave Peterson

Is the worksheet protected?

Do you use merged cells in that range?

Can you do the same sort manually?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Sorting in code 4
Run-time error 1004... 4
Run time error 1004 - what have I done wrong? 1
Help with input box to select a sort up to 28 1
Insert Row 2
VBA Sort Problem 2
Macro not working properly when run automatically 9
VBA Variable Range Sort 4

Top