read data from cells and convert to sheet object

Hello,

I want to hide all worksheets which are listed in a table.
The list contains the sheet codenames (Sheet1, Sheet2, etc.).
The problem is to read the data in the list and convert the string to a sheet object.

The following code doesnt´t work:

For i = 63 To 96
numero = Worksheets("tablas macro").Cells(i, 1)
numero.Visible = False
Next i

The cells contain the codenames Sheet1, etc.
Any suggestion?

Thanks a lot

In the meantime I found the solution, it's working now
Thanks in any case WDB !


For i = 63 To 96
numero = Worksheets("tablas macro").Cells(i, 1)
For Each ws In ThisWorkbook.Worksheets
If ws.CodeName = numero Then
ws.Visible = False
End If
Next ws
Next i