Sort of range leaves range "selected"

I have a dozen or so worksheets with the same template, and my code does a
sort on a range within each sheet. After the sort, tho, the range is still
"highlighted", as if I had selected the range (which I didn't, not with
"select", at least), i.e., it's shaded just as if I had clicked on the upper
left cell of the range and dragged down to the lower right. I would like the
range to remain visually unaltered, but I can't figure out how.

Thanks in advance

Mike J

XP
Fri Jul 25 12:16:42 CDT 2008

Not sure if this would help, but you could just add one line at the end of
your sort code to select one cell of your choice, for example:

[A2].Select

Hope this helps.

"Mike Jamesson" wrote:

> I have a dozen or so worksheets with the same template, and my code does a
> sort on a range within each sheet. After the sort, tho, the range is still
> "highlighted", as if I had selected the range (which I didn't, not with
> "select", at least), i.e., it's shaded just as if I had clicked on the upper
> left cell of the range and dragged down to the lower right. I would like the
> range to remain visually unaltered, but I can't figure out how.
>
> Thanks in advance
>
> Mike J

Susan
Fri Jul 25 12:23:04 CDT 2008

mike - using this sub on excel 2000, my ranges don't get
highlighted.........

For Each ws In wb.Worksheets
ws.Activate
myLastRow =3D ws.Cells(10000, 1).End(xlUp).Row
Set myRange =3D ws.Range("a1:b" & myLastRow)
myRange.Sort Key1:=3DRange("A1"), Order1:=3DxlAscending, Header:=3DxlNo,
_
OrderCustom:=3D1, Orientation:=3DxlTopToBottom
Next ws

don't know why your ranges are highlighted.
susan



On Jul 25, 12:23=A0pm, Mike Jamesson
<MikeJames...@discussions.microsoft.com> wrote:
> I have a dozen or so worksheets with the same template, and my code does =
a
> sort on a range within each sheet. =A0After the sort, tho, the range is s=
till
> "highlighted", as if I had selected the range (which I didn't, not with
> "select", at least), i.e., it's shaded just as if I had clicked on the up=
per
> left cell of the range and dragged down to the lower right. =A0I would li=
ke the
> range to remain visually unaltered, but I can't figure out how.
>
> Thanks in advance
>
> Mike J

MikeJamesson
Fri Jul 25 12:46:52 CDT 2008

Thanks for the response, here's my code:

Sub SortTallies(targSheet As Worksheet)
Dim targRange As Range
' Application.ScreenUpdating = False 'doesn't help
Set targRange = targSheet.Range("TargDates")
Set targRange = Range(targRange, targRange.End(xlDown))
Set targRange = Range(targRange, targRange.End(xlToRight))
targSheet.Sort.SortFields.Clear
targSheet.Sort.SortFields.Add Key:=targRange.Range( _
"A1:A8"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With targSheet.Sort
.SetRange targRange
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
.SortFields.Clear 'didn't work to clear visible "selection" effects
End With
' Set targRange = targSheet.Range("A1") 'didn't work to clear visible
"selection" effects
' targRange.Select 'bombed
' Application.ScreenUpdating = True
End Sub

As you can see, I used a recorded macro as my basis; also, I don't want to
select either the sheets or the ranges, and have successfully avoided doing
so. But then when I go to the sheets, the area that got sorted is "selected"
visually, and each sheet shows this phenomenon. I'm using Excel 2007 SP1,
btw.

Thanks again

Mike

"Susan" wrote:

> mike - using this sub on excel 2000, my ranges don't get
> highlighted.........
>
> For Each ws In wb.Worksheets
> ws.Activate
> myLastRow = ws.Cells(10000, 1).End(xlUp).Row
> Set myRange = ws.Range("a1:b" & myLastRow)
> myRange.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo,
> _
> OrderCustom:=1, Orientation:=xlTopToBottom
> Next ws
>
> don't know why your ranges are highlighted.
> susan
>
>
>
> On Jul 25, 12:23 pm, Mike Jamesson
> <MikeJames...@discussions.microsoft.com> wrote:
> > I have a dozen or so worksheets with the same template, and my code does a
> > sort on a range within each sheet. After the sort, tho, the range is still
> > "highlighted", as if I had selected the range (which I didn't, not with
> > "select", at least), i.e., it's shaded just as if I had clicked on the upper
> > left cell of the range and dragged down to the lower right. I would like the
> > range to remain visually unaltered, but I can't figure out how.
> >
> > Thanks in advance
> >
> > Mike J
>
>