i want to activate the sheet based on my cell value
but the prog is not working
Code
Sub emptest()
Dim tempname As String
Worksheets("team").Select
Range("c24").Select
Do While ActiveCell.Value <> ""
If ActiveCell.Value = tempname Then
Worksheets(tempname).Select
Else
MsgBox "no sheet"
End If
ActiveCell.Offset(1, 0).Select
Loop
End Sub
please help me