View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Max Max is offline
external usenet poster
 
Posts: 9,221
Default Bringing focus back to source point upon subroutine run completion

Hi guys,

Let's say I'm working in Sheet13 with cursor on B3

Using Alt+F8, I call / run a sub from my personal.xls, for example:

Sub SwitchOffGridLinesWS()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Activate
ActiveWindow.DisplayGridlines = False
Next
End Sub

The sub finishes its job but the activesheet has changed
to the rightmost sheet's cell A1

How do I bring the cursor focus back to where I was when I ran the sub:
i.e. back to Sheet13 with cursor on B3 ?

Thanks for insights.
--
Rgds
Max
xl 97
---
Please respond, in newsgroup
xdemechanik <atyahoo<dotcom
----