How do I unhide shapes?

[llamamom]

My text box and shapes disappeared on my worksheet. I don't know how that
happened, so I don't know how to unhide them? They are visible in Print
Preview and they Print just fine, but there is a misspelled word in the text
box and I can't see it on the worksheet to fix it. Help.

 

[Don Guillett]

Sub getnameofshapes()
On Error Resume Next
For Each sh In ActiveSheet.Shapes
MsgBox sh.Name
mv = sh.Name
MsgBox ActiveSheet.Shapes(mv).TopLeftCell.Address
Next sh
End Sub

 

[Ron de Bruin]

Try Ctrl 6