Open to Cell A1

chrisxs5 · Jul 29th 2005

First, let me say thankyou to all of you who always help.

So with that said this is what am trying to accomplish:

When workbook opens,
go to worksheet "home"
go to cell "A1"
then
When worksheet closes save and password protect data
unless data is already protected, in that case skip this step.

Don't worry as I write and do different things I will learn all this stuff!

JF · Jul 29th 2005

Re: Open to Cell A1

Was not sure but guessed that you would also want the sheet unprotected when the workbook was opened. If not, then you can remove that line from the code.

Code

Private Sub Workbook_Open()
    Sheets("home").Select
    ActiveSheet.Unprotect ("password")
    Range("A1").Select
End Sub




Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("home").Select
    ActiveSheet.Protect ("password"), UserInterfaceOnly = True, DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

Display More

Put this code in the "This Workbook" object (right click on the excell icon in the left corner of the workbook and select view code).

chrisxs5 · Jul 29th 2005

Re: Open to Cell A1

I get a an amibuous name error for the workbook_open.

I do have a workbook open command already being used, could this cause this?

**norie** · Jul 29th 2005

Re: Open to Cell A1

Quote from chrisxs5

I do have a workbook open command already being used, could this cause this?

Yes

You can only have 1 workbook event per workbook.

You'll need to somehow combine the codes.

chrisxs5 · Jul 29th 2005

Re: Open to Cell A1

I combined the two and it works great, thanks!

Open to Cell A1

Participate now!

Share