Do this:


Sub SaveNClose()

Sheet1.Select
Range("B5").Select
ActiveWorkbook.Close True

End Sub


-Jack




"Steved" wrote:

Hello from Steved
I'm getting this error
method'select'of object'_worksheet'failed

Sub SaveNClose()
Range("B5").Select
Sheet1.Select
Range("B5").Select
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

Please help

Thankyou.