cannot understand error with range handling

[fredderf81]

hello all, for the life of me i cannot figure out why i am receiving an error here. i am simply trying to select the last used cell in a named range. i keep receiving the error: object variable or with block variable not set.

Private Sub CommandButton1_Click()
Dim myrange As Range

myrange = Workbooks("wis.xlsm").Sheets("Sheet1").Range("A1", Range("A65536").End(xlUp)) <<<<errors here
Range(myrange).Select

End Sub

thanks

[sktneer]

Try this...

Private Sub CommandButton1_Click()
Dim myrange As Range

Set myrange = Workbooks("wis.xlsm").Sheets("Sheet1").Range("A65536").End(xlUp)
myrange.Select

End Sub

Hope this helps.

[fredderf81]

thank you very much. i'm not sure why i cannot grasp that concept as i have failed there before....*sigh* still learning!

[sktneer]

Not a big issue. Sometime it happens with everyone. So just relax. Glad to help you.