VBA scroll to top of page

[andrewb90]

Hello,

How do I make the excel page scroll all the way up when running a macro?

Andrew

 

[shg]

activewindow.scrollrow=1

 

[andrewb90]

thanks!

 

[shg]

You're welcome.

 

[FragaGeddon]

I had to clear data from multiple sheets at once, and it wouldn't go back to the top after of the sheet.
In order to set them all back to the first cell I want the user to input, I added this after clearing the contents on multiple sheets.

' Set to first cell
    Sheets("Sheet1").Select
    Range("D4").Select
    Sheets("Sheet2").Select
    Range("D4").Select
    Sheets("Sheet3").Select
    Range("D4").Select
    Sheets("Sheet4").Select
    Range("D4").Select
    Sheets("Sheet5").Select
    Range("D4").Select
    Sheets("Sheet6").Select
    Range("D4").Select
    Sheets("Sheet7").Select
    Range("D4").Select
    Sheets("Sheet8").Select
    Range("D4").Select
    Sheets("Sheet9").Select
    Range("D4").Select
    Sheets("Sheet10").Select
    Range("D4").Select
    Sheets("Sheet11").Select
    Range("D4").Select
    Sheets("Sheet12").Select
    Range("D4").Select
    Sheets("Sheet13").Select
    Range("D4").Select

 

[L. Howard]

Try this in for all sheet in the Array to D4.

Sheets(Array("Sheet1", "Sheet2", "Sheet3", "Sheet4", "Sheet5")).Select
    Range("D4").Select
    Sheet1.Select   '< Or the sheet you want to end up on

Regards,
Howard

 

[FragaGeddon]

That's what I had after the array, but it wouldn't scroll back to the top.
That's why I had to add in after the array. And it clears more sheets after that, and I have it actually go to a certain sheet at the end.
But it does reset the view to that cell for each of the sheets.
If you select a bunch of cells and type in D4 in the name box, it doesn't scroll the other sheets up, only the current one.

 

[L. Howard]

I'm not understanding what is not working for you.

Howard

 

[bs0d]

In the interest of avoiding ActiveCell, ActiveSheet, ActiveWindow.... and also avoiding selections in code, what's the best approach to ensuring a sheet or tab is scrolled to the top, particularly when it's not in focus?

Something like this (which does not work):

Sheet1.ScrollRow = 1

 

[bs0d]

Is it possible to use ScrollRow on a sheet name without using Active* ?