Select a worksheet based on the value of a cell

[joes2007]

I have a selection box that is populated with a range that is populated with the names of all of my sheets. The selection box is linked the the range C3 noted in the code below. I want to be able to click the button that will run this sub and have it activate the sheet selected from the selection box. I keep getting different errors. Help!

Private Sub welcomego_Click()


Dim ws As Worksheet
Dim wsname As Range


Set wsname = Sheets(sheet13).Range("c3").Value


Sheets(wsname).Select


End Sub

 

[Fluff]

Try

Private Sub welcomego_Click()


Dim ws As Worksheet
Dim wsname As String


wsname = Sheets("sheet13").Range("c3").Value


Sheets(wsname).Select


End Sub

 

[Scott T]

try

Private Sub welcomego_Click()

Dim ws As Worksheet
Dim wsname As String

wsname = Sheets(sheet13).Range("c3")

Sheets(wsname).Select

End Sub