Thank you Alan. I have actually used Gary's solution so that the thing works
whichver tab the spreadsheet is opened in. Howver your information will be
very useful for other purposes.

Cheers,
Kevryl

"Alan Carpenter" wrote:
When you see that window, it should (if it has no code) show:

Private Sub Workbook_Open()

End Sub


If you paste your code between those two lines, it should work.


Private Sub Workbook_Open()
Workbooks.Open "cashups.xls"
End Sub

Add the path, e.g.
Workbooks.Open "c:MyFolder\cashups.xls"

There are MANY other options, but this should do what you want.

Add this line before the End Sub to show your original Workbook.

Workbooks("accounting.xls").Activate

Cheers,
Alan Carpenter

The syntax in help is unclear as always, but I don't think it requires
the brackets shown in help. I have tried them anyway, and I get an
error message saying an "=" sign is expected.

I've had a look in this thread and found a more functional method if I
can get it to work, and this is:

Dim wbk As Workbook

On Error Resume Next
Set wbk = Workbooks("Cashups.xls")
On Error GoTo 0

If wbk Is Nothing Then
MsgBox "Opening Cashups.xls now"
Set wbk = Workbooks.Open("C:\MyBook.xls")
End If

I copied and pasted this into the same window, just changing the
example to my own filename and remming out my first attempt, but it
still wouldn't open the other file.

Can someone tell me what I did wrong? Also, is there a way of doing
this so that whichever tab the "accounting.xls" file opens to the
macro will still run?