ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   sort in excel (office xp) (https://www.excelbanter.com/excel-discussion-misc-queries/93199-sort-excel-office-xp.html)

Francine

sort in excel (office xp)
 
I am trying to get column H to sort as the others are doing using a
macro (see below).
Using the CTRL + H function I get the find and replace feature popping
up. How do I get it to sort properly using CTRL + H?
Based on the same formula my other columns d-g sort properly. Any
advice is appreciated.

Sub Macro5()
'
' Macro1 Macro
' Macro created 06/09/2006

' Keyboard Shortcut: Ctrl+h
'
Range("C13:H58").Select
Range("H13").Activate
Selection.Sort Key1:=Range("H13"), Order1:=xlDescending,
Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("G7").Select
End Sub


Allllen

sort in excel (office xp)
 
Francine

As you have seen, lots of those CTRL+A,B,C combinations are reserved for
shortcuts.

Why don't you set them all (or just this one?) to work with CTRL+SHIFT+A,B,C
etc?
Those aren't reserved at least until you get to O (I tried them).
You must have had the same problem with column F.
--
Allllen


"Francine" wrote:

I am trying to get column H to sort as the others are doing using a
macro (see below).
Using the CTRL + H function I get the find and replace feature popping
up. How do I get it to sort properly using CTRL + H?
Based on the same formula my other columns d-g sort properly. Any
advice is appreciated.

Sub Macro5()
'
' Macro1 Macro
' Macro created 06/09/2006

' Keyboard Shortcut: Ctrl+h
'
Range("C13:H58").Select
Range("H13").Activate
Selection.Sort Key1:=Range("H13"), Order1:=xlDescending,
Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("G7").Select
End Sub




All times are GMT +1. The time now is 02:28 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com