Часто удобно включать текст рабочего листа в диаграмму. Например, если у основного рабочего листа есть название, Вы могли бы также хотеть использовать тот текст в качестве своего названия диаграммы. Точно так же у Вас могла бы быть ценность рабочего листа, это связано с диаграммой, такой как среднее число ценностей в ряду, и Вы могли бы хотеть включать ту ценность как часть названия диаграммы или названия оси ценности. Вы можете просто отредактировать соответствующий текст объекта диаграммы вручную, чтобы включать ценность. Однако, если та ценность подвержена изменениям (особенно, если это - a

расчетная ценность, такая как среднее число), тогда Вы должны всегда обновлять объект диаграммы вручную. Идеально, замечательно использовать метод, посредством чего текст диаграммы обновлен автоматически всякий раз, когда текст рабочего листа изменяется.

В предыдущих версиях Excel Вы можете сделать, это вполне легко, связывая текст диаграммы возражает против клетки рабочего листа. Вы делаете это, выбирая текстовый объект диаграммы, печатая равняется знаку (=), чтобы позволить Excel знать, что Вы хотите войти в формулу, щелкая клеткой рабочего листа, содержащей текст, который Вы хотели, и затем нажим Вступает, чтобы подтвердить формулу. Увы, тот легкий и прямой метод был уронен в Excel 2007, который теперь рассматривает текстовые объекты диаграммы как чистые текстовые окна, которые не могут включать формулы.

К счастью, есть способ работать вокруг этого ограничения, используя немного кодекса VBA, который использует в своих интересах факт, что у текстовых объектов диаграммы есть текстовая собственность. Идея состоит в том, что Вы используете VBA, чтобы установить текстовую собственность объекта, равную ценности клетки рабочего листа. Например, название диаграммы соответствует объекту ChartTitle, таким образом, Вы изменяете ChartTitle. Текстовая собственность.

Например, предположите, что название рабочего листа находится в клетке A1. Если Вы хотите использовать тот же самый текст в названии диаграммы, Вы щелкаете диаграммой, чтобы активировать его и затем ввести следующий код в Непосредственном окне Визуального Основного Редактора:

ОТМЕТИТЬ

С Визуальным Основным открытым Редактором (нажимают Alt+F11), Вы показываете Непосредственное окно, выбирая Представление, Непосредственное Окно, или нажимая Ctrl+G.

ActiveChart. ChartTitle. Текст = ActiveSheet. Диапазон (”A1 ″)

Это дает Вам статическое название диаграммы. Таким образом, если Вы изменяете название в клетке A1, название диаграммы автоматически не обновляет. Это не проблема для названия, которое не изменяется, но что, если Вы используете изменчивую ценность, такую как среднее число как часть названия диаграммы? Например, учитывая рабочий лист, который показывает среднее число ряда данных в клетке C3, вот процедура, которая включает среднее число в текст названия диаграммы:

Общественный Sub WriteChartTitle ()
С ActiveSheet. ChartObjects (1).Chart
.ChartTitle. Текст = “Близко (Среднее число =” & Формат (ActiveSheet. Диапазон (”C3 ″), “00.0 ″) &“)”
Конец с
Конец Sub

Рисунок 1 показывает диаграмму с добавленным текстом. (Отметьте, что в этой процедуре я использовал более тщательно продуманную ссылку на диаграмму-ActiveSheet. ChartObjects (1).Chart. Это означает, что диаграмма не должна быть активирована, чтобы установить название. )

Рисунок 1 название Этой диаграммы включает среднее значение calcu¦-lated в клетку C3.

Это прекрасно, но текст названия все еще статичен. Как мы можем заставить Excel обновлять название диаграммы автоматически, если среднее число изменяется? Было бы хорошо, если Excel, который 2007 предложил прямому способу сделать это, но это не делает, таким образом, мы должны следовать более окольным маршрутом. Определенно, мы должны использовать в своих интересах факт, что в Excel, Вы можете заманить в ловушку случай SheetChange, который стреляет всякий раз, когда данные о клетке изменяются в любом рабочем листе. Выполните эти шаги, чтобы создать укладчика для этого случая:

1. В Визуальном Основном Редакторе используйте Проектное окно, чтобы открыться, VBA предполагают, что corre¦-sponds к учебному пособию, которое содержит Вашу диаграмму.
2. Дважды щелкните по пункту ThisWorkbook в проекте. Визуальный Основной Редактор открывает окно модуля для объекта ThisWorkbook.
3. В окне модуля сбросьте выпадающий список Object (наверху модуля, это - список слева), и выберите Учебное пособие.
4. Сбросьте выпадающий список Procedure (наверху модуля, это - список справа), и выберите SheetChange. Визуальный Основной Редактор добавляет окурок следующей процедуры:
   Частный Sub Workbook_SheetChange (ByVal Sh как объект, цель ByVal как диапазон)
   Конец Sub
5. Напечатайте свой кодекс обработчика событий между заявлениями Sub и End Sub.

В окурке процедуры переменная Sh представляет рабочий лист, на котором изменилась ценность, и Целевая переменная представляет объект Диапазона (то есть, клетка), который был изменен. В примере Вы должны проверить, чтобы видеть, совпадает ли название листа с названием листа, на котором диаграмма проживает (Текст рабочего листа, в этом случае). Если это, Вы называете процедуру, которая пишет название диаграммы. Вот кодекс:

Частный Sub Workbook_SheetChange (ByVal Sh как объект, цель ByVal как диапазон)
Если Sh. Имя = “текст рабочего листа” тогда
WriteChartTitle
Конец, если
Конец Sub

Признаки Technorati: текст рабочего листа в диаграмме

Популярность: [4%?]

Часто удобно включать текст рабочего листа в диаграмму. Например, если у основного рабочего листа есть название, Вы могли бы также хотеть использовать тот текст в качестве своего названия диаграммы. Точно так же у Вас могла бы быть ценность рабочего листа, это связано с диаграммой, такой как среднее число ценностей в ряду, и Вы могли бы хотеть включать ту ценность как часть названия диаграммы или названия оси ценности. Вы можете просто отредактировать соответствующий текст объекта диаграммы вручную, чтобы включать ценность. Однако, если та ценность подвержена изменениям (особенно, если это - a

расчетная ценность, такая как среднее число), тогда Вы должны всегда обновлять объект диаграммы вручную. Идеально, замечательно использовать метод, посредством чего текст диаграммы обновлен автоматически всякий раз, когда текст рабочего листа изменяется.

В предыдущих версиях Excel Вы можете сделать, это вполне легко, связывая текст диаграммы возражает против клетки рабочего листа. Вы делаете это, выбирая текстовый объект диаграммы, печатая равняется знаку (=), чтобы позволить Excel знать, что Вы хотите войти в формулу, щелкая клеткой рабочего листа, содержащей текст, который Вы хотели, и затем нажим Вступает, чтобы подтвердить формулу. Увы, тот легкий и прямой метод был уронен в Excel 2007, который теперь рассматривает текстовые объекты диаграммы как чистые текстовые окна, которые не могут включать формулы.

К счастью, есть способ работать вокруг этого ограничения, используя немного кодекса VBA, который использует в своих интересах факт, что у текстовых объектов диаграммы есть текстовая собственность. Идея состоит в том, что Вы используете VBA, чтобы установить текстовую собственность объекта, равную ценности клетки рабочего листа. Например, название диаграммы соответствует объекту ChartTitle, таким образом, Вы изменяете ChartTitle. Текстовая собственность.

Например, предположите, что название рабочего листа находится в клетке A1. Если Вы хотите использовать тот же самый текст в названии диаграммы, Вы щелкаете диаграммой, чтобы активировать его и затем ввести следующий код в Непосредственном окне Визуального Основного Редактора:

ОТМЕТИТЬ

С Визуальным Основным открытым Редактором (нажимают Alt+F11), Вы показываете Непосредственное окно, выбирая Представление, Непосредственное Окно, или нажимая Ctrl+G.

ActiveChart. ChartTitle. Текст = ActiveSheet. Диапазон (”A1 ″)

Это дает Вам статическое название диаграммы. Таким образом, если Вы изменяете название в клетке A1, название диаграммы автоматически не обновляет. Это не проблема для названия, которое не изменяется, но что, если Вы используете изменчивую ценность, такую как среднее число как часть названия диаграммы? Например, учитывая рабочий лист, который показывает среднее число ряда данных в клетке C3, вот процедура, которая включает среднее число в текст названия диаграммы:

Общественный Sub WriteChartTitle ()
С ActiveSheet. ChartObjects (1).Chart
.ChartTitle. Текст = “Близко (Среднее число =” & Формат (ActiveSheet. Диапазон (”C3 ″), “00.0 ″) &“)”
Конец с
Конец Sub

Рисунок 1 показывает диаграмму с добавленным текстом. (Отметьте, что в этой процедуре я использовал более тщательно продуманную ссылку на диаграмму-ActiveSheet. ChartObjects (1).Chart. Это означает, что диаграмма не должна быть активирована, чтобы установить название. )

Рисунок 1 название Этой диаграммы включает среднее значение calcu¦-lated в клетку C3.

Это прекрасно, но текст названия все еще статичен. Как мы можем заставить Excel обновлять название диаграммы автоматически, если среднее число изменяется? Было бы хорошо, если Excel, который 2007 предложил прямому способу сделать это, но это не делает, таким образом, мы должны следовать более окольным маршрутом. Определенно, мы должны использовать в своих интересах факт, что в Excel, Вы можете заманить в ловушку случай SheetChange, который стреляет всякий раз, когда данные о клетке изменяются в любом рабочем листе. Выполните эти шаги, чтобы создать укладчика для этого случая:

1. В Визуальном Основном Редакторе используйте Проектное окно, чтобы открыться, VBA предполагают, что corre¦-sponds к учебному пособию, которое содержит Вашу диаграмму.
2. Дважды щелкните по пункту ThisWorkbook в проекте. Визуальный Основной Редактор открывает окно модуля для объекта ThisWorkbook.
3. В окне модуля сбросьте выпадающий список Object (наверху модуля, это - список слева), и выберите Учебное пособие.
4. Сбросьте выпадающий список Procedure (наверху модуля, это - список справа), и выберите SheetChange. Визуальный Основной Редактор добавляет окурок следующей процедуры:
   Частный Sub Workbook_SheetChange (ByVal Sh как объект, цель ByVal как диапазон)
   Конец Sub
5. Напечатайте свой кодекс обработчика событий между заявлениями Sub и End Sub.

В окурке процедуры переменная Sh представляет рабочий лист, на котором изменилась ценность, и Целевая переменная представляет объект Диапазона (то есть, клетка), который был изменен. В примере Вы должны проверить, чтобы видеть, совпадает ли название листа с названием листа, на котором диаграмма проживает (Текст рабочего листа, в этом случае). Если это, Вы называете процедуру, которая пишет название диаграммы. Вот кодекс:

Частный Sub Workbook_SheetChange (ByVal Sh как объект, цель ByVal как диапазон)
Если Sh. Имя = “текст рабочего листа” тогда
WriteChartTitle
Конец, если
Конец Sub

Признаки Technorati: текст рабочего листа в диаграмме

Популярность: [4%?]