Excel VisualBasic Script

Sub vis()
     Names("StoreNumber").Visible = False
End Sub