drozeveld
asked on
Scroll Multiple Sheets in Excel 2010
Hi,
I'm wondering if there is a way to scroll to the same place over multiple sheets in EXCEL. I have about 25 sheets each week that I would like to start at the same place.
I'm wondering if there is a way to scroll to the same place over multiple sheets in EXCEL. I have about 25 sheets each week that I would like to start at the same place.
ASKER
Thank you for responding, but I guess I need to better explain what I would like to be able to do.
When I have all the worksheets highlighted in my workbook, I would like to scroll the pages so that cell A1 is showing when I go to each page, which is what can be done with Ctrl-PgUp and Ctrl-PgDn.
When I have all the worksheets highlighted in my workbook, I would like to scroll the pages so that cell A1 is showing when I go to each page, which is what can be done with Ctrl-PgUp and Ctrl-PgDn.
You want to switch worksheets and when you do that you need the cursor to move to A1 of that sheet?
ASKER
Yes, but I don't want to press Ctrl-Home on every sheet.
ASKER
Actually the cell that I want to be able to see is F31. Some worksheets are showing A1, some are showing where the cursor is at in F31. If I scroll to the bottom of the worksheet on the first page, then I want all the other worksheets to be in the same place so that I can view those cells too.
Are you familiar with macros?
Enter this code in the "Workbook" module of your workbook.
I do think this could be a nuisance at times.
Enter this code in the "Workbook" module of your workbook.
I do think this could be a nuisance at times.
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("A1").Select
End Sub
Ok now this is a different requirement which came before I posted a response to the previous comment.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
This is already in ThisWorkbook:
Public Sub SaveAsA1()
ThisFile = Range("A1").VALUE
ActiveWorkbook.SaveAs Filename:=ThisFile
End Sub
Do I remove that?
Public Sub SaveAsA1()
ThisFile = Range("A1").VALUE
ActiveWorkbook.SaveAs Filename:=ThisFile
End Sub
Do I remove that?
Whether or not you move (or delete) SaveAsA1 is up to you. It can remain in its current location and will not interfere with the Workbook_SheetDeactivate event sub I suggested.
That said, it is considered good practice to put only event-driven subs in class modules like ThisWorkbook. If you follow this good practice, you would move SaveAsA1 into a regular module sheet (use Insert...Module to create one if you don't already have a Module1, Module2, etc.).
If you make this move, you will see the macro listed as "SaveAsA1" in the ALT + F8 macro selector rather than "ThisWorkbook!SaveAsA1"
That said, it is considered good practice to put only event-driven subs in class modules like ThisWorkbook. If you follow this good practice, you would move SaveAsA1 into a regular module sheet (use Insert...Module to create one if you don't already have a Module1, Module2, etc.).
If you make this move, you will see the macro listed as "SaveAsA1" in the ALT + F8 macro selector rather than "ThisWorkbook!SaveAsA1"
ASKER
How do I make sure that your macro only goes into this workbook?
Did you try the code?
I anticipated your question with statement 6, and it will only synchronize worksheets in the workbook containing the macro.
I anticipated your question with statement 6, and it will only synchronize worksheets in the workbook containing the macro.
ASKER
It did not work like I am hoping to see it work.
I had the file that I want it to work on open, found ThisWorkbook by going to Developer and opened Visual Basic.
Tried it - didn't work. Closed that file and opened another file to see if the macro I referred to above was in another workbook, because I'm not sure what it is trying to do there and found that it was and also the one you gave me was there too....therefore, I'm not wondering if I inserted it correctly.
I had the file that I want it to work on open, found ThisWorkbook by going to Developer and opened Visual Basic.
Tried it - didn't work. Closed that file and opened another file to see if the macro I referred to above was in another workbook, because I'm not sure what it is trying to do there and found that it was and also the one you gave me was there too....therefore, I'm not wondering if I inserted it correctly.
When you open the workbook, you must enable macros. The code won't work if you don't. Try closing the workbook and then reopening it. You should see a warning about macros.
If that approach still isn't working for you, please post your workbook. I'll make sure the code is installed correctly.
Brad
If that approach still isn't working for you, please post your workbook. I'll make sure the code is installed correctly.
Brad
ASKER
Sometimes...when you review your own work, you find that you put the macro in ThisWorkbook of your personal.xls files, and not just the workbook that you had open. When you review this, and move the macro to the correct place - it works EXACTLY like you want it to.
Thank you!!
Thank you!!
Ctrl-PgUp
Ctrl-PgDn