1004 Ошибка выполнения при добавлении диаграммы Excel

Question

Рассмотрим этот код:

Subroutine(ByRef objExcelApp As Object)

Dim objChart As Excel.Chart<br>
Dim objChartAdd As Excel.Chart


Set objChart = Charts.Add

'Plotting graph in excel 

'After completion 
Set objChart = Nothing

End Sub

Когда я запускаю этот код, все работает нормально, и без закрытия приложения, если запустить его с другим типом отчета - выдается ошибка 1004 при Set objChart = Charts.Add

Любая помощь, которую может предоставить любой, будет принята с благодарностью.

Answer 1

Можете ли вы добавить диаграмму в пользовательский интерфейс? Держу пари, что вы находитесь в ситуации, когда невозможно добавить диаграмму (выбрано несколько листов; рабочая книга не активирована; защищенный диапазон активен и т. Д.)

Chris