Excel VBA - how to make an shape in excel appear and disappear?

[rohaizad77]

Hi,

I am using excel 2007, I created a shape from Excel (Insert-Shapes). I want this shape to appear and disappear base on some values but as a first step, I cant even get the visible property to work.

I created a button and in the click event, i do this code.

With ActiveSheet.Shapes("UpArrow3")
.Visible = Not .Visible
End With


I got an error that says....

"The item with the specified name wasn't found." - highlighted the 1st line.

Seems like excel cannot find UpArrow3 - so how do I make sure the shape that i add is called UpArrow3 - how to view its properties????

THanks in advance!!!!

 

[Gary McMaster]

Your statement should be:

.Visible = msoTrue or .Visible = msoFalse

I don't know why, but intellisense doesn't work with just "ActiveSheet". If you do the following intellisense will be enabled and you will at least get a hint of what the proper syntax is:

Dim oActive As Worksheet
 
Set oActive = ActiveSheet
 
oActive.Shapes("UpArrow3").Visible = msoFalse

Gary

 

[rohaizad77]

Thank you so much!!!!!