Насколько высоки легенды-записи в диаграмме Excel?

Я знаю, что это звучит глупо, но мне нужно знать реальную высоту одиночной легенды.

Легенда-Entry

Зачем:

В моей диаграмме высота изменяется, в зависимости от Легенда-Записи на правой стороне диаграммы.

Код VBA:

1 countLegend = ActiveChart.Legend.LegendEntries.Count 2 If countLegend > 13 Then 3 ActiveChart.Parent.Height = 325 + 10 * (countLegend - 13) 4 Else 5 ActiveChart.Parent.Height = 325 6 End If 

« 10 » в строке 3 является текущим решением, но если я добавлю слишком много легенд-записей, там будет большое пространство сверху и снизу …

Надеюсь, кто-то может помочь мне с этой проблемой …

Заранее благодарю за ваши ответы …

Interesting Posts
Давайте будем гением компьютера.