adam_neb
Board Regular
- Joined
- Jun 9, 2002
- Messages
- 101
I created a macro before vacation:
Sub SORT_LANES()
Range("A2", Range("M65536").End(xlUp).Address).Select
Selection.Sort Key1:=Range("L2"), Order1:=xlAscending _
, Key2:=Range("K2"), Order2:=xlAscending _
Selection.Sort Key1:=Range("F2"), Order1:=xlAscending _
, Key2:=Range("E2"), Order2:=xlAscending _
, Key3:=Range("G2"), Order3:=xlAscending
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending _
, Key2:=Range("B2"), Order2:=xlAscending _
, Key3:=Range("D2"), Order3:=xlAscending
End Sub
Now it will not work. I tested it several times before I closed up and left, and when I open the workbook containing the macro, I get the promt and Enable Macros, but when I run it - nothing! Augh! Any ideas what I did wrong???
Adam
Sub SORT_LANES()
Range("A2", Range("M65536").End(xlUp).Address).Select
Selection.Sort Key1:=Range("L2"), Order1:=xlAscending _
, Key2:=Range("K2"), Order2:=xlAscending _
Selection.Sort Key1:=Range("F2"), Order1:=xlAscending _
, Key2:=Range("E2"), Order2:=xlAscending _
, Key3:=Range("G2"), Order3:=xlAscending
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending _
, Key2:=Range("B2"), Order2:=xlAscending _
, Key3:=Range("D2"), Order3:=xlAscending
End Sub
Now it will not work. I tested it several times before I closed up and left, and when I open the workbook containing the macro, I get the promt and Enable Macros, but when I run it - nothing! Augh! Any ideas what I did wrong???
Adam