Динамическая диаграмма.

[ShamanK]

парни подскажите пожалуйста возможно ли сделать следующее:
при наведении мышкой на определенную ячейку выскакивает окошко с диаграммой ( диаграмма рассчитывается по данным закрепленным к этой ячейке)

[Teslenko_EA]

Здравствуйте ShamanK.
" сделать следующее..." - конечно возможно как и больщинство других вещей в этой жизни, но цена вопроса для Вас думаю будет непроъемной.
Евгений.

[ShamanK]

Евгений, с какой стати вы решили посчитать деньги в моем кармане?

[doober]

Евгений прав,такое решение будет денег стоит.
Все в этом мире можно сделать, было бы желание и ...

[Teslenko_EA]

ShamanK, есть такое понятие целесообразность, можно при желании и в Запорожец воткнуть мотор от Мерседеса, но дешевле купить Мерседес, жалко Ваш "карман".
Евгений.

[serafim09]

Сообщение от ShamanK

парни подскажите пожалуйста возможно ли сделать следующее:
при наведении мышкой на определенную ячейку выскакивает окошко с диаграммой ( диаграмма рассчитывается по данным закрепленным к этой ячейке)

Приветствую!

У меня есть вариант решения (сразу говорю, не мой) из книги к VBA.
Там на определенную ячейку в примечание возможно внести диаграмму. При этом все Динамично! Т.е. меняются значения в расчетах и соответственно меняется диаграмма.


Если нужно обращайся. Возможно это решения не совсем подходит тебе.

[ShamanK]

Сообщение от serafim09

Приветствую!

У меня есть вариант решения (сразу говорю, не мой) из книги к VBA.
Там на определенную ячейку в примечание возможно внести диаграмму. При этом все Динамично! Т.е. меняются значения в расчетах и соответственно меняется диаграмма.


Если нужно обращайся. Возможно это решения не совсем подходит тебе.

наверно я не правильно написал ))
под словом ДИНАМИЧЕСКАЯ я имел в виду - один раз просчиталась и просто выскакивает при наведении на ячейку.
пересчитывать и перерисовывать диаграмму в режиме онлайн нет необходимости.

[VictorM]

один раз просчиталась и просто выскакивает при наведении на ячейку.

В таком случае можно попробовать такой вариант, сохраните диаграмму как рисунок и далее - Фото в примечаниях к ячейке

[serafim09]

Сообщение от VictorM

В таком случае можно попробовать такой вариант, сохраните диаграмму как рисунок и далее - Фото в примечаниях к ячейке

Вот именно этот макрос я имел ввиду только автоматизированный

Вод код на всякий случай:

Сообщение от ShamanK

привет, нужно ))

Смысл макроса в том, что он копирует в определенную диаграмму в файл на раб. стол и или др. место. А потом в указанную тобой ячейку вставляет картинкой как фон в примечании.

И если сделать запуск этого макроса при изменении данных на листе , на которые ссылется диаграмма, то каждый раз диаграмма будет в примечании обновляться.

сам макрос

Sub PlaceGraph()
Dim x As String, z As Range
Application.ScreenUpdating = False
x = "C:\XWMJGraph.gif" ' - сдесь путь для сохранения рисунка 
Set z = Worksheets("Диаграмма в примечании").Range("A3") ' - сдесь путь для листа и ячейки с примечанием
On Error Resume Next
z.Comment.Delete
On Error GoTo 0
ActiveSheet.ChartObjects("Chart 1").Activate ' - сдесь путь на диаграмму
ActiveChart.Export x
With z.AddComment 
    With .Shape ' - устанавливаешь размеры примечания под диаграмму
        .Height = 322
        .Width = 465
        .Fill.UserPicture x
    End With
End With
Range("A1").Activate
Application.ScreenUpdating = True
Set z = Nothing
End Sub