Hi,
I'm wondering if the below code can be put together for better coding. My code is getting longer.
From:
To something like:With .ChartObjects("Chart 1") ' .Height = Range("d100").Value2 .Width = Range("c100").Value2 ' End With ' With .ChartObjects("Chart 2") ' .Height = Range("d100").Value2 .Width = Range("c100").Value2 ' End With ' With .ChartObjects("Chart 3") ' .Height = Range("d100").Value2 .Width = Range("c100").Value2 ' End With ' With .ChartObjects("Chart 4") ' .Height = Range("d100").Value2 .Width = Range("c100").Value2 ' End With
With .ChartObjects("Chart 1-4") ' .Height = Range("d100").Value2 .Width = Range("c100").Value2 ' End With
Bookmarks