Open woorkbook -active sheet -next cell

[kctony]

I have been using the following code to open a workbook to a specific sheet and going to the next available row for data entry. It had been working fine. Then in the course of testing, It stopped working and I would get a "ws = nothing" error...

Private Sub Workbook_Open()
    Dim ws As Worksheet
    'Set ws = ActiveSheet
    Set ws = ActiveWorkbook.Sheets("Contents")
    ws.Cells(ws.Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub

This is probably simple but it is bugging me... I'm still learning but apparently not enough.

 

[Fluff]

You cannot select a cell on an inactive sheet, try

Private Sub Workbook_Open()
    Sheets("Contents").Select
    Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub

 

[kctony]

Thank you but that didn't seem to work.
It now just opens to wherever it was last.

 

[Fluff]

Are you saying that it doesn't take you to the first blank row on the contents sheet?

 

[kctony]

Yes, that is what I am saying...
It just opens where ever it was when the workbook/worksheet closed.
I'm sure it's me but that is what is happening

 

[Fluff]

Do you always have data in col A for every used row?

 

[kctony]

Yes... Column A has data.
I click a button to call a form to add new data which populates activecell 1,2 and 3 from left to right starting at the active cell which should be the next available row in column A.
but if the active cell is someplace else in the workbook, that is where it will open. (and that is where the information will populate)
Also, as a little fly in the ointment... I have hyperlinks from the contents page to the corresponding sheets and back. when I hyper link back to the contents page the active cell becomes A!.
thanx for you help... I've been trying but this is becoming a learning experience

 

[kctony]

Sorry, I think I figured it out...
I had the OpenWorkbook as a separate module and not inside the "ThisWorkbook"
It seems to work now.
Now i just have to make it go there after returning from a hyper link
Thanx again

 

[Fluff]

Glad you sorted it & thanks for the feedback