Solved

When opening Excel 2000, can it open at row 1000?

Posted on 2008-11-02
7
141 Views
Last Modified: 2013-12-04
I have 1000 records on one sheet in Excel 2000, is it possible for us to see row 1000 every time I open it?

Thanks,

0
Comment
Question by:Brgzaq
  • 3
  • 2
7 Comments
 
LVL 58

Assisted Solution

by:tigermatt
tigermatt earned 100 total points
ID: 22861570

Use the below macro. In Excel, go to Tools > Macros and then launch the Visual Basic Editor. Paste the code below into Module 1, then save your workbook.

The macro will run each time Excel opens and focus on cell A1000. Remember to change your Macro Security to Minimum or Low.

-tigermatt
Sub Auto_Open()

    

    Range("A1000").Select

    

End Sub

Open in new window

0
 
LVL 81

Accepted Solution

by:
byundt earned 150 total points
ID: 22862078
Brgzaq,
Although Auto_Open will work just as tigermatt promised, it has been a hidden feature of Excel VBA since Excel 97. The preferred approach is a Workbook_Open sub--which must be installed in the ThisWorkbook code pane.

Here is a Workbook_Open sub that will select the last record entered on a specified worksheet--no matter whether one record or a thousand have been entered so far. It will go to that row even if the workbook was saved with a different worksheet active. The macro also offers choices for displaying that row at the top of the window, or perhaps with 5 previous records showing to provide more context.

To install a sub in the code pane for ThisWorkbook:
1) ALT + F11 to open the VBA Editor
2) If you don't see a list of VBA projects on the left, then CTRL + R to open the Project Explorer
3) In the Project Explorer window, double-click ThisWorkbook to open its code pane
4) Paste the suggested code in the resulting module sheet
5) ALT + F11 to return to the spreadsheet

If the above procedure doesn't work, then you need to change your macro security setting. To do so, open the Tools...Macro...Security menu item. Choose Medium, then click OK.

Brad
Private Sub Workbook_Open()

With Worksheets("Sheet1")

    Application.Goto .Cells(.UsedRange.Row + .UsedRange.Rows.Count - 1, 1)

End With

ActiveWindow.ScrollRow = ActiveCell.Row             'Move the selection to the top row in the window

'ActiveWindow.ScrollRow = ActiveCell.Row - Application.Min(ActiveCell.Row - 1, 5) 'Show last five rows

End Sub

Open in new window

0
 
LVL 81

Expert Comment

by:byundt
ID: 22863743
Brgzaq,
Thanks for the grade!
Brad
0
U.S. Department of Agriculture and Acronis Access

With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.

 
LVL 58

Expert Comment

by:tigermatt
ID: 22863772

Why didn't I get any points, my solution was still valid and worked?
0
 

Author Comment

by:Brgzaq
ID: 22863846
tigermatt:

Your solution works for me. It just missed specifying the name of the sheet. However  I really want to give you points. But I am new to this site. Can you tell me the way to give points to you after I give to the other solution?

Thank you.

0
 
LVL 58

Expert Comment

by:tigermatt
ID: 22865169

Guys,

Thanks - this was much appreciated :)

-tm
0

Featured Post

Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
excel pivot question 4 40
how to read all the sheets in excel 12 42
ms office troubleshooting for users 8 36
Sweet32 Vulnerability in Microsoft IIS7.5 6 56
Article by: btan
The intent is not to repeat what many has know about Ransomware but more to join its dots of what is it, who are the victims, why it exists, when and how we respond on infection. Lastly, sum up in a glance to share such information with more to help…
Recently, I read that Microsoft has analysed statistics for their security intelligence report. It revealed: still, the clear majority of windows users do their daily work as administrator. An administrative account is a burden, security-wise. My ar…
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.
This Micro Tutorial will demonstrate the scrolling table in Microsoft Excel using the INDEX function.

867 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now