Я пытаюсь написать код VBA для копирования стиля шрифта одного элемента диаграммы в другой в диаграмме Excel 2007.В частности, я пытаюсь скопировать стиль шрифта из ChartArea в ChartTitle.У меня проблема со свойством Font.Underline.
Независимо от того, какое свойство Underline в ChartArea имеет значение , установите в (eq xlUnderlineStyleSingle), свойство Underline возвращает значение, которое не соответствует ни одной из констант XlUnderlineStyle (значение 1745390344).
Это, без сомнения, связано с тем, что пользовательский интерфейс для установки шрифта элемента диаграммы немного отличается отПользовательский интерфейс для установки шрифта ячейки на листе.
Для ячейки пользовательский интерфейс отображает только два стиля подчеркивания (одинарный и двойной) плюс «нет».Это соответствует значениям в перечислении XlUnderlineStyle.
Для элемента диаграммы пользовательский интерфейс отображает целый набор стилей подчеркивания, включая волнистые линии и т. Д. Они не представлены в этом перечислении.
Итак, я подозреваю, что - для элементов диаграммы - на самом деле можно задать другое свойство, а свойство Font.Underline просто возвращает значение «искать в другом месте».
Может кто-нибудьскажите, как называется это другое свойство, и могу ли я получить к нему доступ через VBA?
EDIT вот какой-то код, который можно ввести непосредственно в непосредственное окно, чтобы увидеть проблему (сначала выберите график):
?ActiveChart.ChartArea.Font.Underline