open a specific excel worksheet from powerpoint

[bg66]

Hi,
I want open a specific excel worksheet from powerpoint.
I try:

Sub ApriExcel()
Dim xlApp As Object
Dim xlWorkBook As Object
Dim ExcelValue As Double

Set xlApp = CreateObject("Excel.Application")

xlApp.Visible = True
Set xlWorkBook = xlApp.Workbooks.Open("C:\Users\Microsoft\Desktop\Formazione light\Formazione\Start formazione\Slides Ended\AvvioCorso.xlsm", True, False)

xlWorkBook.Worksheets("Start").Range("B2").Value 'give me a debug Error

End Sub

But debug does not like it . Where am I wrong?

Thanks in advance
bg66

[John Wilson]

It should not give a debug error. If there are problems with the path you may get a runtime error. Have you a screen shot of the error. Is Option Explicit ON?

I doubt whether ExcelValue is a Double but it should work.

Are you intentionally setting UpdateLinks to True ?

[bg66]

Hello John,

It should not give a debug error. If there are problems with the path you may get a runtime error. Have you a screen shot of the error. Is Option Explicit ON?

I doubt whether ExcelValue is a Double but it should work.

Are you intentionally setting UpdateLinks to True ?

No, sorry.I tried, badly, to change your macro posted in another thread.

[John Wilson]

Don't know then. If you have been playing with code that opens Excel it might be worth checking you don't have an invisible copy open.

CTRL+SHIFT+ESC to open Task Manager. Choose processes and look for EXCEL.exe running in the background. If it's there are you don't have Excel open normally then End the process and try again.

[bg66]

But is this script string,anyway,correct?

xlWorkBook.Worksheets("Start").Range("B2").Value

In Excel VBA the correct phrase is: ".Range("B2").Select".

Thanks for your answer.

[John Wilson]

Depends what you are trying to do - as written you are correct it is incorrect

If you want to read the value in the cell

Excelvalue=xlWorkBook.Worksheets("Start").Range("B2").Value

is correct

If you want to select that cell then as you say ...