1

Следующий код VBA добавляет объект ChartObject к листу "Feuil1", но также возвращает общую ошибку 1004 (ошибка, определенная объектом).

Sub test()

Dim ch As ChartObject
Set ch = Worksheets("Feuil1").ChartObjects.Add(100, 30, 400, 250)

End Sub

Я не понимаю смысла этого сообщения, так как работа выполнена правильно, т.е. создан ChartObject.

Для дальнейшего изучения я решил представить некоторые данные этому Ch ChartObject. Я взял онлайн справку VBA в качестве примера:

Sub test()

Dim ch As ChartObject
Set ch = Worksheets("Feuil1").ChartObjects.Add(100, 30, 400, 250)

ch.Chart.ChartWizard Source:=Worksheets("Feuil1").Range("a1:a20"), _
gallery:=xlLine, Title:="New Chart"

End Sub

Еще раз у меня есть общее сообщение об ошибке 1004, и отладчик показывает, что ошибка вызвана строкой Set ch = Worksheets("Feuil1").ChartObjects.Add(100, 30, 400, 250) . Мои ячейки от А1 до А20 заполнены данными, поэтому проблема в другом месте.

Есть идеи о происхождении этой ошибки?

0