open a specific excel worksheet from powerpoint

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

Code:

---

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 :banghead:. Where am I wrong?

Thanks in advance
bg66

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 ?

Hello John,

Quote:

---

Originally Posted by 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?

---

https://i.imgur.com/2tZM6Iz.jpg


https://i.imgur.com/LwvNQfq.jpg

Quote:

---

Originally Posted by John Wilson

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.

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.

But is this script string,anyway,correct?

Code:

---

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

---

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

Thanks for your answer.

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 ...