VBA Coding for a Userform Command Button

[Khan.saleena]

Hello
So basically, I have created a Userform and it asks the question "Do you wish to continue to Log Out?" and there are two Command Buttons within that Userform. A "No" Command Button and a "Yes" Command Button.

If the individual was to press "Yes" then the Workbook would automatically shut down, however if the individual was to press "No" then it would re-locate them to another sheet within that same Workbook.

However I am having some trouble with the VBA coding for the "No" command button.

This is the current coding that is inputted, however it keeps getting highlighted in yellow -

Private Sub CommandButton1_Click()<o></o>
Application.Goto Worksheets("Sheet4"), Range("A1")<o></o>
Unload Me ' unloads the userform<o></o>
End Sub

Thank You

 

[VoG]

Try

Application.Goto Worksheets("Sheet4").Range("A1")

 

[Khan.saleena]

Try

Application.Goto Worksheets("Sheet4").Range("A1")

Nope, it didnt work unfortunately

 

[VoG]

It works for me.

 

[Khan.saleena]

I have tried the following -

Application.Goto Worksheets("Sheet4 (Order History)"), Range("A1")

and now it says the following -

Worksheets("Sheet4 (Order History)") = subscript out of range<subscript out="" of="" range=""> </subscript>

 

[VoG]

As in my first post you need a . not a ,

Application.Goto Worksheets("Order History"). Range("A1")

 

[Khan.saleena]

Oh sorry, I failed to see that first time
However i have implemented the full stop and it has worked
Thank you ever so much