Set group of wksheets to top of page

  • Thread starter Thread starter Karen53
  • Start date Start date
K

Karen53

Hi,

Is there a way to set a group of worksheets to the top of the page without
activating each individual worksheet. Here is what I have but it doesn't
work unless I activate each sheet.

FirstIndex = Firstpg.Index
LastIndex = Lastpg.Index

Set ws = Nothing
For Each ws In wbkCopyTo.Worksheets
'set worksheet to top of page
If ws.Index > FirstIndex Then
If ws.Index < LastIndex Then
ws.Activate
Application.GoTo Reference:="R4C7"
ActiveWindow.SmallScroll Up:=3
ActiveWindow.ScrollColumn = 1
End If
End If
Next
 
Hi Karen,

I do not believe that a selection can be made
on an inactive sheet; therefore, in this case,
selection of the sheets is necessary.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

For Each ws autofill 1
Match Error 2
a for selected sheets print named page macro 1
Format results of Macro 2
Copy Auto-filtered data to new sheets 6
Have A1 in Top left corner of screen Q 2
Owner Draw 8
Find the correct sheet then find a value on that sheet 8

Back
Top