Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move the position of spreadsheet on the screen
I would like to have my spreadsheet select a like like "AA12" and move this
cell to left upper of the screen. I use sheets("sheets").Range("AA12").select Ther cell wa selected, but it is located on any where on the screen. I want to show user the data base on cell "AA12". Is it posible to have my spreadsheet celll on the left upper of the screen? Any infromation is great appreciated, |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move the position of spreadsheet on the screen
"Souris" wrote in message
... I would like to have my spreadsheet select a like like "AA12" and move this cell to left upper of the screen. I use sheets("sheets").Range("AA12").select Ther cell wa selected, but it is located on any where on the screen. I want to show user the data base on cell "AA12". Is it posible to have my spreadsheet celll on the left upper of the screen? Here's one way to do it: Application.Goto Sheets("sheets").Range("AA12"), True -- Rob Bovey, Excel MVP Application Professionals http://www.appspro.com/ * Take your Excel development skills to the next level. * Professional Excel Development http://www.appspro.com/Books/Books.htm |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move the position of spreadsheet on the screen
You can use the Goto method of the Apllication object with Scroll parameter
set to True: Application.Goto Destination, Scroll Eg: '--------------------------------------------- Sub test() DisplayRange Range("A500") End Sub Sub DisplayRange(Rg As Range) On Error Resume Next 'activate book Rg.Parent.Parent.Activate If Err < 0 Then 'could be hidden book MsgBox "Cannot activate the parent book." Exit Sub End If 'activate sheet Rg.Parent.Activate If Err < 0 Then 'could be hidden sheet MsgBox "Cannot activate the parent Sheet." Exit Sub End If 'Select and go to Rg Application.Goto Rg, True End Sub '------------------------------------------------------ -- Regards, Sébastien <http://www.ondemandanalysis.com "Souris" wrote: I would like to have my spreadsheet select a like like "AA12" and move this cell to left upper of the screen. I use sheets("sheets").Range("AA12").select Ther cell wa selected, but it is located on any where on the screen. I want to show user the data base on cell "AA12". Is it posible to have my spreadsheet celll on the left upper of the screen? Any infromation is great appreciated, |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Position screen at end of macro | Excel Discussion (Misc queries) | |||
Position of New Excel Spreadsheet on screen | Excel Discussion (Misc queries) | |||
unable to move spreadsheet around the screen | Excel Discussion (Misc queries) | |||
MsgBox Screen Position | Excel Programming | |||
Move Cell to Top/Left Position on Screen | Excel Programming |