Gee

not sure quite why this works, but try it anyway:

Sheets("SOURCE 1").Select
With Sheets("SOURCE 1")
.Range("H77").Select
End With

Regards

Trevor


"Gee" wrote in message
...
I'm having trouble with a button I created. When clicked
it's supposed to go to sheet "SOURCE 1" and then to Cell
H77. I keep getting the message "Select Method of Range
Class has Failed"

Private Sub CommandButton31_Click()
Sheets("SOURCE 1").Select
Range("H77").Select
End Sub

Any ideas what I'm doing wrong?

Thank you for any help you can give me,
Gee