Powerpoint VBA Ссылки

Question

Я пишу код VBA в Powerpoint, где мне нужно позвонить и Excel файл для ввода. Программа работает нормально, работает без ошибок и генерирует выходные данные, за исключением части, где вызывается файл Excel. Он просто не открывает файл Excel.

Написал 3-4 строки, чтобы просто вызвать файл Excel, и он также работает без ошибок, но не открывает файл. Я подозреваю, что что-то упустил в списке литературы.

Код является:

Sub Test()

Dim Booki As Excel.Application
Set Booki = New Excel.Application

Booki.Workbooks.Open "C:\Users\Kashyap\Desktop\Test.xlsx"

End Sub

Добавлены следующие ссылки: a) Visual Basic для приложений b) библиотека объектов Microsoft powerpoint 14.0 c) автоматизация OLE d) библиотека объектов Microsoft Office 14.0 e) библиотека объектов Microsoft Excel 14.0

Кто-нибудь может дать мне знать, какую библиотеку мне не хватает?

Answer 1

Если вы хотите увидеть недавно открытый экземпляр Excel, вы должны сделать его видимым (см. Ниже). Вы также захотите закрыть рабочую книгу и преуспеть, когда закончите, иначе у вас будут осиротевшие задания, слоняющиеся за едой памяти. Фактически, прежде чем тестировать приведенный ниже код, запустите диспетчер задач, посмотрите на процессы и уничтожьте все экземпляры Excel.exe.

Sub Test()

Dim Booki As Excel.Application
Dim Wb As Excel.Workbook

Set Booki = New Excel.Application

Set Wb = Booki.Workbooks.Open("C:\temp\test.xlsx")

' if you want to SEE the result,
Booki.Visible = True

' show us something from the workbook to prove that it's open:
MsgBox Wb.Worksheets(1).Cells(1, 1).Value

Wb.Close
Booki.Quit

Set Wb = Nothing
Set Booki = Nothing

End Sub