Defaults

[liam_conor]

I need my workbook to always display each worksheet at the A1 cell location. Also, when I close my workbook I want it to revert to the first worksheet in the workbook when it is openened. Any suggestions?

 

[royUK]

To select A1 put this in the Worksheet activate - right click on the worksheet tab and select View Code, in the right hand dropdown screen that is displayed choose "Activate" and then paste.

Private Sub Worksheet_Activate()
Range("A1").Select
End Sub

Similarly in the Workbook _Open paste

Private Sub Workbook_Open()
Sheet1.Select
End Sub
This message was edited by royUK on 2002-10-10 09:47

 

[lenze]

Right click on the Excel icon to the left of the File menu on the menu bar. Choose view code. Enter this

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheet1.Activate
Range("$A$1").Select
End Sub

This will cause the Workbook to open on Sheet1 with $A$1 selected. If you want each sheet to always open at $A$1, the add this code

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveSheet.Range("$A$1").Select
End Sub

HTH

Sorry royUK: I didn't see your post
This message was edited by lenze on 2002-10-10 09:52

 

[liam_conor]

Thank you for all your help!!!

 

[liam_conor]

Thank you for all your help!!!