_MARTIN_....Help!
from 
WinCustomize Forums
WinCustomize Forums
Hey Martin! I've been trying to following your example with the iTunes Object and it has helped me get closer to my goal (DesktopX doesn't crash immediately). Thank you. But, now I'm stuck. I've used the following code to get a excel file object using the MS Office Spreadsheet ActiveX control onto my desktop but it does actually display the excel file in question. Could you help me to improve it? Here isthe code that works:
Dim excelApp
'Called when the script is executed
Sub Object_OnScriptEnter
Set excelApp = CreateObject("Excel.Application")
excelApp.Workbooks.Open("C:\My Documents\Spare_Brain My Documents\DIPRC.XLS")
End Sub
When I change the following line, "excelApp.Workbooks.Open" to the one below it crashes:
Control.ActiveWorkbooks = excelApp.Workbooks.Open("C:\My Documents\Spare_Brain My Documents\DIPRC.XLS")
Any help would be appreciated.
Thanks,
Scott
Dim excelApp
'Called when the script is executed
Sub Object_OnScriptEnter
Set excelApp = CreateObject("Excel.Application")
excelApp.Workbooks.Open("C:\My Documents\Spare_Brain My Documents\DIPRC.XLS")
End Sub
When I change the following line, "excelApp.Workbooks.Open" to the one below it crashes:
Control.ActiveWorkbooks = excelApp.Workbooks.Open("C:\My Documents\Spare_Brain My Documents\DIPRC.XLS")
Any help would be appreciated.
Thanks,
Scott