Referências do Powerpoint VBA

Question

Eu estou escrevendo um código VBA no Powerpoint, onde eu preciso chamar e excel arquivo para entrada. O programa está funcionando bem, é executado sem erros e gera saída, exceto a parte em que o arquivo do Excel é chamado. Simplesmente não abre o arquivo do Excel.

Escreveu 3-4 linhas para apenas chamar um arquivo excel e também corre sem erro, mas não abre o arquivo. Eu suspeito que estou faltando alguma coisa em referências.

O código é:

Sub Test()

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

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

End Sub

As referências adicionadas são: a) Visual Basic para aplicações b) Microsoft powerpoint 14.0 Biblioteca de objetos c) Automação OLE d) Biblioteca de objetos do Microsoft Office 14.0 e) Biblioteca de objetos do Microsoft Excel 14.0

Alguém pode me informar qual biblioteca estou perdendo?

    

Answer 1

Se você quiser ver a instância recém-aberta do Excel, você deve torná-la visível (veja abaixo). Você também vai querer fechar a pasta de trabalho e se destacar quando terminar, senão você terá tarefas órfãs penduradas na memória. Na verdade, antes de testar o código abaixo, inicie o Gerenciador de Tarefas, examine Processos e elimine todas as instâncias do 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