Reference is not valid

[Steved]

Hello from Steved

Sub SaveNClose()
Application.Goto Reference:=Worksheets(1).Range("A5").Activate
ActiveWorkbook.Close True
End Sub

Below is giving an error Reference is not valid
Application.Goto Reference:=Worksheets(1).Range("A5").Activate

What do I need to correct please.

Thankyou.

[Steved]

Hello from Steved

Thankyou I got the answer .

Application.Goto Reference:=Worksheets(1).Range("A5")

"Steved" wrote:

> Hello from Steved
>
> Sub SaveNClose()
> Application.Goto Reference:=Worksheets(1).Range("A5").Activate
> ActiveWorkbook.Close True
> End Sub
>
> Below is giving an error Reference is not valid
> Application.Goto Reference:=Worksheets(1).Range("A5").Activate
>
> What do I need to correct please.
>
> Thankyou.
>
>