try to chance: If Sh.Name = Vumber Then to If Sh.Name = Vnumber


"Ashley Frank" skrev:


I am trying to select a worksheet by an object name:

Sheet 1 user selection of worksheets = Vnumber

Sub SheetExists()
Dim Sh As Worksheet, Exist As Boolean, Vnumber As Object
Set Vnumber = Range("F7")
Exist = False
For Each Sh In Sheets
If Sh.Name = Vumber Then
Exist = True
End If
Next Sh

MsgBox Vnumber
Sheets = Vnumber.Select (*this does not work)*
Range("A1").Select

I have also tried
Sheets(Vnumber).Select
Sheets.Name = Vnumber.Select

Thanks

Ashley


--
Ashley Frank
------------------------------------------------------------------------
Ashley Frank's Profile: http://www.excelforum.com/member.php...o&userid=26488
View this thread: http://www.excelforum.com/showthread...hreadid=397549