Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
This should be easy, but I can't quite get it. I need an event macro that
will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
cant get it to work with deactivate-event, but activate seems ok if u can use
it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
Thanks, but I think Activate is not an option. The way I come into the
worksheet is via about 150 hyperlinks, so the Activate event macro would interrupt the destination and I'd alwawys arrive at the bottom of the worksheet. "excelent" wrote: cant get it to work with deactivate-event, but activate seems ok if u can use it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
ok try put in ThisWorkbook insted
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: Thanks, but I think Activate is not an option. The way I come into the worksheet is via about 150 hyperlinks, so the Activate event macro would interrupt the destination and I'd alwawys arrive at the bottom of the worksheet. "excelent" wrote: cant get it to work with deactivate-event, but activate seems ok if u can use it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#5
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
I appreciate all the help, but that routine still defeats the hyperlinks and
I end up at the bottom of the destination worksheet. Here's the need restated - but I don't blame you for giving up! Two sheets, "Index" and "Library". Index has a list of 150 topics, each of which hyperlink into a different row in column A of Library. Need to have the hyperlinks always arrive in Library at the top of the active window. A logical approach seems to be to have Library scroll to the end (row 1112) upon Deactivate. Doing it on the way in (using Activate) seems to override the hyperlinks. Finally, do NOT want the Index worksheet to be affected by the routine; want the active cell and window in Index to remain in place after leaving and returning the worksheet. "excelent" wrote: ok try put in ThisWorkbook insted Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: Thanks, but I think Activate is not an option. The way I come into the worksheet is via about 150 hyperlinks, so the Activate event macro would interrupt the destination and I'd alwawys arrive at the bottom of the worksheet. "excelent" wrote: cant get it to work with deactivate-event, but activate seems ok if u can use it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#6
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
try insert in Library-sheet-tab-code-window
Private Sub Worksheet_Activate() Application.Goto Reference:=ActiveCell, scroll:=True End Sub "andy62" skrev: I appreciate all the help, but that routine still defeats the hyperlinks and I end up at the bottom of the destination worksheet. Here's the need restated - but I don't blame you for giving up! Two sheets, "Index" and "Library". Index has a list of 150 topics, each of which hyperlink into a different row in column A of Library. Need to have the hyperlinks always arrive in Library at the top of the active window. A logical approach seems to be to have Library scroll to the end (row 1112) upon Deactivate. Doing it on the way in (using Activate) seems to override the hyperlinks. Finally, do NOT want the Index worksheet to be affected by the routine; want the active cell and window in Index to remain in place after leaving and returning the worksheet. "excelent" wrote: ok try put in ThisWorkbook insted Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: Thanks, but I think Activate is not an option. The way I come into the worksheet is via about 150 hyperlinks, so the Activate event macro would interrupt the destination and I'd alwawys arrive at the bottom of the worksheet. "excelent" wrote: cant get it to work with deactivate-event, but activate seems ok if u can use it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
#7
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Auto scroll down event
Awesome, that did it! Thanks a million.
"excelent" wrote: try insert in Library-sheet-tab-code-window Private Sub Worksheet_Activate() Application.Goto Reference:=ActiveCell, scroll:=True End Sub "andy62" skrev: I appreciate all the help, but that routine still defeats the hyperlinks and I end up at the bottom of the destination worksheet. Here's the need restated - but I don't blame you for giving up! Two sheets, "Index" and "Library". Index has a list of 150 topics, each of which hyperlink into a different row in column A of Library. Need to have the hyperlinks always arrive in Library at the top of the active window. A logical approach seems to be to have Library scroll to the end (row 1112) upon Deactivate. Doing it on the way in (using Activate) seems to override the hyperlinks. Finally, do NOT want the Index worksheet to be affected by the routine; want the active cell and window in Index to remain in place after leaving and returning the worksheet. "excelent" wrote: ok try put in ThisWorkbook insted Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: Thanks, but I think Activate is not an option. The way I come into the worksheet is via about 150 hyperlinks, so the Activate event macro would interrupt the destination and I'd alwawys arrive at the bottom of the worksheet. "excelent" wrote: cant get it to work with deactivate-event, but activate seems ok if u can use it Private Sub Worksheet_Activate() Application.Goto Reference:=Cells(Cells(65535, 1).End(xlUp).Row, 1), scroll:=True End Sub "andy62" skrev: This should be easy, but I can't quite get it. I need an event macro that will cause the current worksheet to "scroll down" to the end of the data set before going to the other, selected worksheet. The data set is fixed, so I could use something like "ActiveWindow.ScrollRow =", or "Application.Goto Reference:=" to a name/bookmark. I tried to use those functions inside "Private Sub WorkSheet_Deactivate()" but couldn't get it to work. Anyone? TIA. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
adding scroll bar to scroll on cell's content? | Charts and Charting in Excel | |||
Need help in removing auto scroll cursor from excel | Excel Worksheet Functions | |||
Scroll horizontaly with mouse, create same system used to scroll . | New Users to Excel | |||
Speed up and slow down, the auto-scroll. | Excel Discussion (Misc queries) | |||
Auto scroll down data validation list | Excel Discussion (Misc queries) |