Hi,

I am trying to sort a group of cells on another page with vba. I keep
getting a select method of Range Class Failed error. What am I doing wrong?
I have checked all variables and they have the correct values.

Tablespg.Range(ItemCol & ItemFRow & ":" & PoolCol & Lusedrow).Select
Selection.Sort Key1:=Range(ItemCol & ItemFRow), _
Order1:=xlAscending, _
Header:=xlGuess, _
OrderCustom:=1, _
MatchCase:=False, _
Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

I also tried:

Tablespg.Range(ItemCol & ItemFRow & ":" & PoolCol & Lusedrow).Select
Selection.Sort Key1:=Tablespg.Range(ItemCol & ItemFRow), _
Order1:=xlAscending, _
Header:=xlGuess, _
OrderCustom:=1, _
MatchCase:=False, _
Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

--
Thanks for your help.
Karen53