Процедура создания объекта Excel не найдена |«Ошибка времени выполнения -2147024769 (8007007f)»

Question

Привет. Я пытаюсь запустить очень простой макрос Microsoft Excel, код которого показан ниже:

Set objExcel = CreateObject("Excel.Application")

objExcel.Application.Visible = True

objExcel.Workbooks.Add

objExcel.Cells(1, 1).Value = "Test value"

Однако я продолжаю получать следующую ошибку:

Run-time Error '-2147024769 (8007007f)':

Automation Error

The specified procedure could not be found

Кто-нибудьзнаете, что может быть причиной этого?После некоторых копаний, это что-то делать с COM.Заранее большое спасибо!

Answer 1

Вы уже в Excel, поэтому все, что вам нужно, это

sub demo
Workbooks.Add()
Range("A1")="Test Value"
End Sub

Однако ваш код будет работать в Word - там откроется Excel, затем рабочая книга и затем запишется в A1.