Just a little one ( so the wife says )

Im tring to close an excel sheet from a differant work book, this I can do.

Private Sub CommandButton7_Click()
Windows("Week One.xls").Activate
ActiveWindow.Close
End Sub

Problem is if ("week One") is already shut. I get that nasty error

Please if anyone can help

Perhap modify this IF statement:

That works lovley thanks a lot

Maybe you can help with another problem

When I right comething in vb it put the link in from were the file is

ie
__________________________________________________ _____________
Private Sub CommandButton1_Click()
ChDir "C:\Documents and Settings\Mad1\Desktop\New Folder"
Workbooks.Open Filename:= _
"C:\Documents and Settings\Mad1\Desktop\New Folder\Week One.xls"
Sheets("Home W1").Select
End Sub
__________________________________________________ _____________

how can I put this onto another PC so it doesnt look for my PC, it just looks in the folder were the files are

Mark