Use If statement to display picture

[Rob]

Is there a way to display a picture (clipart, Bitmap, etc.)
using an If statement?

Example: If(H3>100,Picture 1,"").

I would like to display a graphic on our sales flash
everytime we make budget.

Thank you,

Rob

[Jason Morin]

Go ahead and insert the picture on your worksheet. Then
load this macro to hide it:

Sub Hide_It()
ActiveSheet.Shapes("Picture 1").Visible = False
End Sub

Press Alt+F11, click on the ThisWorkbook module for your
file, insert the code above, and run it. Then click on the
appropriate sheet module and insert this code:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Count > 1 Then Exit Sub
With Range("H3")
If .Value > 100 Then
ActiveSheet.Shapes("Picture 1").Visible = True
End If
End With
End Sub

--
HTH
Jason
Atlanta, GA

>.
>

[Rob]

Thanks Jason from our whole team! This works well, and I
have learned something new.

Thanks again,

Rob

>.
>