Thank You! This worked perfect!
Thanks a lot...

Chip Pearson wrote:
Right click the sheet tab and choose View Code. In the code module that
opens up, paste the following code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("B1").Address Then
Me.ChartObjects(1).Visible = (StrComp("Day1", _
Target.Text, vbTextCompare) = 0)
End If
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
(email address is on the web site)


wrote in message
ups.com...
Is there is a function that I could use , where if a cell is equal to
Day1, it would show me an already created chart and if B1 is not "Day1"
it would hide that chart?

Any help is appreciated!