Unhide Sheet Named In Cell

[Delta Star]

I'm trying to get a macro to unhide a sheet named in a specific cell. This is what I'm using but it does not work.

Sheets("Calcs").Range("F31").Visible = True

Can anyone help?

 

[VoG]

Try

Sheets(Sheets("Calcs").Range("F31")).Visible = True

 

[Delta Star]

Have used the code as suggested but I keep getting a message "Type Mismatch" and macro halts.

Just solved it by using:-

Sheets(Sheets("Calcs").Range("F31").Value).Visible = True

 

[VoG]

Excel is being picky. This works

Sheets(Sheets("Calcs").Range("F31").Value).Visible = True

 

[Delta Star]

Peter,

Thanks for your help. Yes it now works.