The code below is not working to adjust the height and width of the legend of a given chart although the position option is working perfectly. can anyone let me know what could be the case. I am using Microsoft office 365, 16.0 version.
If ActivePresentation.Slides(k).Shapes(Temp_Chart_name).Chart.HasLegend = True Then With ActivePresentation.Slides(k).Shapes(Temp_Chart_name).Chart .Legend.Height = 150 .Legend.Width = 450 .Legend.Position = xlLegendPositionBottom End With End If