Is it possible to define an oppening page in a woorkbook?

B

BLopes

I there i have a big woorkbook and i woul like to add some kind of inde
in the first page so I could have a better track of my data.
Like a cover page, instead of opening in the last page when I saved th
document.

Hope you guys can help me on this
 
B

BLopes

This is a good link to a future idea. Thank you Norman.
What i want for now is a way to always open a woorkbook in the same
woorksheet.
Is this possible in a simple way?
 
N

Norman Jones

Hi B,
What i want for now is a way to always open a woorkbook in the same
woorksheet.
Is this possible in a simple way?

Try:
'=============>>
Private Sub Workbook_Open()
Const SheetToOpen As String = "Sheet2" '<<==== CHANGE

Me.Sheets(SheetToOpen).Activate
End Sub
'<<=============

Change "Sheet2" to the name of the sheet of interest.

This is workbook event code and should be pasted into the workbook's
ThisWorkbook module *not* a standard module or a sheet module:

Right-click the Excel icon on the worksheet
(or the icon to the left of the File menu if your workbook is maximised)

Select 'View Code' from the menu and paste the code.

Alt-F11 to return to Excel.
 
B

BLopes

I'm sorry Norman the code doesn't seem to work and I don't know anything
about Visual Basic. :confused:

When I open de code in any sheet and select woorksheet it shows this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

Then I paste the code you gave me like this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Private Sub Workbook_Open()
Const SheetToOpen As String = "TEST"
Me.Sheets(SheetToOpen).Activate
End Sub
End Sub

I also tested like this:

Private Sub Workbook_Open()
Const SheetToOpen As String = "TEST"
Me.Sheets(SheetToOpen).Activate
End Sub

None of these codes opened always the same woorksheet.
They always shown the active sheet when I last saved the document.
I should tell I have Office2003.

Is there any more sugestions or corrections?
Hope to hear from you guys again.
Thank you
 
B

BLopes

I MISPLACED THE CODE IN THE WOORKSHEET CODE AND NOT IN THE WORKBOOK CODE
IN VISUAL BASIC.

You'll be hearing from me in a couple of days now with questions about
the link you gave me.

THANK YOU NORMAM :)
 
Top