VBA не может активировать график - PullRequest
0 голосов
/ 22 апреля 2020

В настоящее время я отображаю график в пользовательской форме, поэтому мне нужно экспортировать график в jpg и загрузить его обратно. Иногда график не сохраняется в файл и после просмотра этого вопроса {link} . Я вижу решение для активации графика. Но при этом возникает ошибка «метод активации объекта _chart failed» Как активировать график?

Function Load_Chart(Area)
Dim Est As Worksheet
Dim CurrentChart As Chart

Set Est = ThisWorkbook.Sheets("Estimate")
    Set CurrentChart = Est.Shapes("Estimate Chart").Chart
    CurrentChart.Activate
    CurrentChart.SetSourceData Source:=Sheets("Estimate").Range(Area)

CurrentChart.Export VBA.Environ("Temp") & Application.PathSeparator & "CurrentChart.jpg"

    Me.imgChart.Picture = LoadPicture(VBA.Environ("Temp") & Application.PathSeparator & "CurrentChart.jpg")

End Function

EDIT Я только что заметил, что если я найду график в электронной таблице, прежде чем я пытаюсь экспортировать его, он работает правильно, и мне не нужна строка CurrentChart.Activate Я не знаю, связано ли это?

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...