#1
|
|||
|
|||
Show same row on next sheet
I am looking for a method so that if say row 450 is the 1st row showing underneath the header row and I changed to another sheet row 450 is again the 1st row showing underneath the header on that sheet. I am finding methods for determining the top row and methods for scrolling to particular row I can’t seem to tie the 2 together. |
#2
|
|||
|
|||
Perhaps this in the 'another sheet' module ?
Code:
Private Sub Worksheet_Activate() Dim ws As Worksheet Dim visRng As String Dim ar, arr Set ws = ActiveSheet Application.ScreenUpdating = False Sheets("Sheet1").Activate '<~~~~~ change to suit visRng = ActiveWindow.VisibleRange.Address Application.EnableEvents = False ws.Activate Application.EnableEvents = True ar = Split(visRng, ":") arr = Split(Mid(ar(0), 2), "$") ActiveWindow.ScrollRow = arr(UBound(arr)) Application.ScreenUpdating = True End Sub |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
How to copy excel sheet withe HEADER and Paste into new sheet? | cloudforgiven | Excel Programming | 6 | 01-05-2017 07:30 PM |
Open an existing sheet by clicking on a cell in a master sheet | darbybrown | Excel | 3 | 09-12-2016 05:12 PM |
Find matching criterior in sheet 1 and copy to Sheet 2 | Auto | Excel Programming | 3 | 03-19-2016 01:41 PM |
Want to show/hide mutiple grouped coloumns in Excel sheet with a button | abutahir | Excel | 4 | 11-03-2015 01:07 PM |
Populate sheet 3 with data from sheet 1 and sheet 2 | speck | Excel Programming | 0 | 01-14-2015 07:54 AM |