ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Position screen at end of macro (https://www.excelbanter.com/excel-discussion-misc-queries/263243-position-screen-end-macro.html)

Kevryl

Position screen at end of macro
 
So far, at the end of a macro I've been sending the cursor across to various
columns and back to position the screen. Itys a bit clumsy, and of course
when you work between different sized computer monitors it doesn't work the
same.

Is there a quick way to position a partcular cell at top left of screen -
and perhaps on a separate occasion a particular cell at bottom right?

Thanks.

Mike H

Position screen at end of macro
 
Hi,

To put a cell at the top left

Application.Goto ActiveSheet.Range("B3"), scroll:=True
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"Kevryl" wrote:

So far, at the end of a macro I've been sending the cursor across to various
columns and back to position the screen. Itys a bit clumsy, and of course
when you work between different sized computer monitors it doesn't work the
same.

Is there a quick way to position a partcular cell at top left of screen -
and perhaps on a separate occasion a particular cell at bottom right?

Thanks.


Jacob Skaria

Position screen at end of macro
 
Hi Kevryl

Try the below

Sub GoToTopLeft()
Dim rngTemp As Range
Set rngTemp = Range(Split(ActiveWindow.VisibleRange.Address, ":")(0))
Application.Goto rngTemp, True
End Sub

Sub GoToBottomRight()
Dim rngTemp As Range
Set rngTemp = Range(Split(ActiveWindow.VisibleRange.Address, ":")(1))
rngTemp.Offset(-1, -1).Activate
End Sub

--
Jacob (MVP - Excel)


"Kevryl" wrote:

So far, at the end of a macro I've been sending the cursor across to various
columns and back to position the screen. Itys a bit clumsy, and of course
when you work between different sized computer monitors it doesn't work the
same.

Is there a quick way to position a partcular cell at top left of screen -
and perhaps on a separate occasion a particular cell at bottom right?

Thanks.


Kevryl

Position screen at end of macro
 
Thanks Mike and Jacob!

"Kevryl" wrote:

So far, at the end of a macro I've been sending the cursor across to various
columns and back to position the screen. Itys a bit clumsy, and of course
when you work between different sized computer monitors it doesn't work the
same.

Is there a quick way to position a partcular cell at top left of screen -
and perhaps on a separate occasion a particular cell at bottom right?

Thanks.



All times are GMT +1. The time now is 01:26 PM.

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