title: Show and Hide Active Chart
body: <p>I have this code which allows charts to show and hide however i have too many charts and hardcoding each of it would be a great hassle. Thus is it possible to hide and show charts based on the active chart?</p>
  
  <p>I have this code and i tried replacing the <code>Chartobjects("Chart4")</code> to <code>ActiveChart</code> but it says object does not support that property. Any alternative ways to make this happen or is there anything wrong with my code? Thank you in advance!</p>
  
  <pre><code>Sub ActiveChartShowHide()
  
  
  With Sheets("Sheet4").ChartObjects("Chart 4")
  .Visible = Not .Visible
  End With
  
  
  End Sub
  </code></pre>